レス数が1000を超えています。残念ながら全部は表示しません。

SKK専用スレッド

560 ：名無しさん＠お腹いっぱい。 ：01/12/19 10:35

便利かもと思って、作ってみた。
どうよ？

(setq skk-rom-kana-rule-list
(cons '("-" nil skk-insert-hyphen)
skk-rom-kana-rule-list))

(defun skk-insert-hyphen (arg)
(interactive "P")
(insert
(let ((c (char-to-string (char-before (point)))))
(cond ((string-match "[0-9]" c) "-")
((string-match "[０-９]" c) "−")
(t "ー")))))

read.cgi ver5.26+ (01/10/21-)