[Mew-dist 12614] Re: comment-region

[Kazu Yamamoto ( 山本和彦 )]

From: SAKAI Kiyotaka <ksakai at example.com>
Subject: [Mew-dist 12609] Re: comment-region

>   (setq comment-start ">")
> 
> を実行するということでしょうか？

そうみたいですね。

--かず

Index: mew-draft.el
===================================================================
RCS file: /usr/home/kazu/cvsroot/Mew/mew/mew-draft.el,v
retrieving revision 1.192
diff -c -r1.192 mew-draft.el
*** mew-draft.el	2000/02/18 05:46:44	1.192
--- mew-draft.el	2000/03/06 07:57:11
***************
*** 297,304 ****
    (make-local-variable 'paragraph-separate)
    (setq paragraph-separate (concat mew-eoh "\\|" paragraph-separate))
    (make-local-variable 'mail-header-separator)
!   (setq mail-header-separator mew-header-separator))
! 
  
  (defun mew-draft-mode (&optional encrypted)
    "\\<mew-draft-mode-map>
--- 297,305 ----
    (make-local-variable 'paragraph-separate)
    (setq paragraph-separate (concat mew-eoh "\\|" paragraph-separate))
    (make-local-variable 'mail-header-separator)
!   (setq mail-header-separator mew-header-separator)
!   (make-local-variable 'comment-start)
!   (setq comment-start ">"))
  
  (defun mew-draft-mode (&optional encrypted)
    "\\<mew-draft-mode-map>