2005-11-24 SKKで丸数字 misc 連想配列を使わないように書き換えた. (defun my-skk-maru-suji() (let*1 (char-to-string (+ ?① (- num 1))) (format "○%d" num)))) *1:num (string-to-number (car skk-num-list)))) (if (and (<= num 20 ) (< 0 num