Newsgroups: fj.editor.emacs
Path: galaxy.trc.rwcp.or.jp!jaist-news!cs.titech!wnoc-tyo-news!icot10!ss151!ss151!inamura
From: inamura@icot.or.jp (INAMURA =JANE= You)
Subject: Re: mh-e no signature
In-Reply-To: okabe@kutsuda.kuis.kyoto-u.ac.jp's message of 14 May 93 20: 00:53 JST
Message-ID: <INAMURA.93May15135811@ss104.icot.or.jp>
Sender: news@ss151.icot.or.jp
Organization: Institute for New Generation Computer Technology, Tokyo, Japan
References: <A93M80.93May13222430@kidss2.kyushu-id.ac.jp>
	<OKABE.93May14200053@boots.kutsuda.kuis.kyoto-u.ac.jp>
Distribution: fj
Date: Sat, 15 May 1993 04:58:11 GMT
Lines: 61
Xref: galaxy.trc.rwcp.or.jp fj.editor.emacs:3740
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.editor.emacs&nb=3740&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$B$^$:!"0lHLE*$J%3%a%s%H$H$7$F(B

>>In article <OKABE.93May14200053@boots.kutsuda.kuis.kyoto-u.ac.jp>,
>>okabe@kutsuda.kuis.kyoto-u.ac.jp (Yasuo Okabe) writes:

a93m80>   /usr/local/emacs18.55/mh-e-3.6.el $B$r(B

mh-e $B$N(B 3.6 $B$O7k9=(B buggy $B$J$N$G!"(B3.7 $B$+$=$l0J>e$NHG$r;H$&J}(B
$B$,$h$$$G$9!#(B

$B"t!H(B/usr/local/emacs18.55/mh-e-3.6.el$B!I$H$$$&%U%!%$%k$,$"$k(B
$B"t$/$i$$$@$+$i!"$?$V$s!"(B 3.7 $BHG0J>e$,C1$K(B mh-e.el $B$H$$$&L>A0(B
$B"t$GCV$+$l$F$$$k$s$@$m$&$H?dB,$G$-$^$9$,!#(B


YO> $B;d<+?H$O(B hook $B$K$@$i$@$i=q$/$N$OM>$j9%$-$G$O$J$$$N$G!"(B.emacs $B$G(B
YO>     (setq load-path (cons (expand-file-name "~/lib/elisp") load-path))
YO> $B$H$7$F$*$$$F!"(B~/lib/elisp/mh-e.el $B$K(B
YO> (load "/usr/local/lib/elisp/mh-e.elc" nil t nil)
YO> ;

$B$o$?$7$b@N$O$3$&$7$F$^$7$?$,!"$3$l$@$HB>$N4D6-$K0\$C$F(B path 
$BL>$,JQ$o$C$?;~$K:$$j$^$7$?$N$G!"$$$^$O(B .emacs $B$N:G=i$G(B

(setq oload-path load-path) ;;; Saving original load-path
(setq load-path (cons (expand-file-name "~/lib/gnu")
      load-path))

$B$7$F$*$$$F!"(B~/lib/gnu/xxx.el $B$J$I$NF,$G$O(B

(let ((load-path oload-path))
  (load "xxx"))

$B$7$F$d$k$h$&$K$J$j$^$7$?!#(B


YO> $B$D$$$G$K8@$$$^$9$H!"I8=`$N(B mh-insert-signature $B$O8=:_0LCV$KFI$_9~$`$N$,(B
YO> $B5$$KF~$i$J$$$N$G!"0J2<$N$h$&$J4X?t$rDj5A$7$F;H$C$F$$$^$9!#(B

$B$3$NJU$bF1$8$J$s$G$9$,!"K\J8$H(B signature $B$N4V$KM>7W$J6u9T$r(B
$BF~$l$J$$$?$a$K(B

YO>   (goto-char (point-max))

$B$N$"$H$G(B

(if (not (looking-at "^$"))
    (insert "\n"))
(save-excursion
  (forward-line -1)
  (while (looking-at "^[ \t]*$")
    (delete-region (point) (progn (forward-line 1) (point)))
    (forward-line -1)))

$B$J$s$F$3$H$r$d$C$F$^$9!#(Bmh-e $B$N(B ^C^S $B$O(B signature $B$rA^F~$9$k(B
$B$@$1$G(B mail $B$OH/?.$5$l$J$$$N$G!"$o$6$o$6$3$s$J$3$H$r$7$J$/$F(B
$B$bMW$i$J$$6u9T$,F~$C$?$+$I$&$+$O$o$+$k$s$G$9$,!":,$,$b$N$0$5(B
$B$J$b$N$G!#(B


$B0pB<!w#I#C#O#T(B
