[Mew-dist 11285] Re: auto-fill on header
Kazu Yamamoto ( 山本和彦 )
kazu at example.com
1999年 11月 12日 (金) 20:21:46 JST
From: SUGIMORI (杉森 隆行) <taro at example.com>
Subject: [Mew-dist 11194] auto-fill on header
> 結構前からなのですが、headerでのauto-fillが、うまく動きません。
> いろいろ調べたところ、1度に3行以上にわたって改行されるような場合に、
> 2行目にTABが入ってくれないようです。
このパッチで直りますか?
--かず
-------------- next part --------------
diff -c -r1.151 mew-draft.el
*** mew-draft.el 1999/11/11 06:38:55 1.151
--- mew-draft.el 1999/11/12 11:48:21
***************
*** 490,497 ****
(if (mew-in-header-p)
(save-excursion
(beginning-of-line)
! (if (not (looking-at "[^ \t]+:\\|[ \t]"))
! (insert "\t")))))
(defun mew-draft-rename (file)
(if (string-match
--- 497,506 ----
(if (mew-in-header-p)
(save-excursion
(beginning-of-line)
! (while (not (or (looking-at "[^ \t]+:\\|[ \t]") (bobp)))
! (insert "\t")
! (forward-line -1)
! (beginning-of-line)))))
(defun mew-draft-rename (file)
(if (string-match
Mew-dist メーリングリストの案内