[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:00285] Re: text-newline-midashi-and-create-spaces



須田さん、こんにちは。逸見 です。

> つもりでは、リターンすると、漢字と英語の間に
> スペースを入れてくれるはずなんですけど。

思いっきりシンプルにしてみました。^^;

(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

Index Home