paren

[Shuhei KOBAYASHI]

;; この convention に関する部分だけ再び emacs-mime-ja にも振ります.

>>>>> In <87902u5794.fsf ＠ dp50.ecc.u-tokyo.ac.jp>,
>>>>> Yoshiki Hayashi <t90553 ＠ mail.ecc.u-tokyo.ac.jp> wrote:
> > このコンベンションに反する閉じ括弧を自動的に修正してくれる
> > ツールはどこかにないでしょうか？
> ツールじゃないですけど、
> (goto-char (point-min))
> (replace-regexp "\n[ \t]*)" ")")
> じゃだめですか? (^^;

私は SKK の

(cond ((or (and (boundp 'epoch::version) epoch::version)
	   (string< (substring emacs-version 0 2) "18") )
       (error "%s SKK requires Emacs 19 or later" skk-branch-name) )
      ((not (featurep 'mule))
       (error "%s SKK requires MULE features" skk-branch-name) ))

のような連続する閉じ括弧の間に space を置くことも convention に反して
いると思うので,

    (replace-regexp ")[ \t\n]+)" "))")

が良いかなと思います.
;; 実際に試していないけどうまく動くかな? (^^;
-- 
Shuhei KOBAYASHI
p.s.
私は forward-sexp/backward-sexp と beginning-of-defun/end-of-defun 派
です. forward-list/backward-list は知りませんでした(^^;