- 562 名前：名無しさん＠お腹いっぱい。 mailto:sage [2005/09/15(木) 10:10:53 ]
- hoge が、アルファベットのみで構成された文字列かどうか調べるなら、
(string-match "\\`[A-Za-z]+\\'" hoge)
charset で調べるなら、
(let ((charsets (find-charset-string hoge)))
(catch 'done
(while charsets
(unless (memq (car charsets)
'(ascii eight-bit-control eight-bit-graphic))
(throw 'done t))
(setq charsets (cdr charsets)))
nil))
とか?
