SKK Part5 - 暇つぶし2ch

SKK Part5 at LINUX

545:login:Penguin
08/11/18 16:45:26 vULSaVnR
>>544
ありがとうございます. よくわからないのですが, こんなのを.emacs.elに
書いておくと "\59" が ";" に変換されるようになりました.
(setq skk-treat-candidate-appearance-function
(lambda (candidate listing-p)
(let (stringc annotation)
(string-match "^\$[^;]+\$;?\$.*\$$" candidate)
(setq stringc (match-string 1 candidate)
annotation (match-string 2 candidate))
(while
(string-match "^\$.*?\$\\\\\$[0-9]+\$\$.*\$$" stringc)
(setq stringc

(concat (match-string 1 stringc)
(char-to-string
(string-to-number (match-string 2 stringc)))
(match-string 3 stringc)
)))
(cons stringc annotation)
)))
なんかすごく無駄があるような…

次ページ

続きを表示

1を表示