[xyzzy:00285] Re: text-newline-midashi-and-create-spaces
- Subject: [xyzzy:00285] Re: text-newline-midashi-and-create-spaces
- From: Masahito Henmi <henmi@xxxxxxxxxxxxx>
- X-mailer: Denshin 8 Go V321.2b5
須田さん、こんにちは。逸見 です。
> つもりでは、リターンすると、漢字と英語の間に
> スペースを入れてくれるはずなんですけど。
思いっきりシンプルにしてみました。^^;
(defun foo ()
(interactive)
(let (c)
(while (not (eq (following-char) #\LFD))
(if (< (char-code (following-char)) 256)
(skip-syntax-spec-forward "w_")
(skip-syntax-spec-forward "jk_"))
(insert #\SPC)
)
)
)
(skip-syntax-spec-forward "jk_"))
こんなん、はじめて知りました。
------------------------------------------------------------
逸見雅人 Email henmi@xxxxxxxxxxxxx
Masahito Henmi