🚀 go-pugleaf

$B!!C^GHBg$NB@ED$G$9!#$3$s$K$A$O!#(B

fj.editor.mule $B$N(B <6vt6lm$5nd$1@gama.is.tsukuba.ac.jp> $B$N5-;v$K$*$$$F(B
 1998-10-13($B2P(B) 00:19$B:"!"(Bys@softlab.is.tsukuba.ac.jp$B$5$s$O=q$-$^$7$?!#(B

><6vsjss$s7b$1@nazuna.bres.tsukuba.ac.jp>$B$N5-;v$K$*$$$F(B
>yohta@bres.tsukuba.ac.jp$B$5$s$O=q$-$^$7$?!#(B
>
>>>   $B%F%-%9%H%U%!%$%k$rJ]B8$9$k;~$K!"%U%!%$%kKv$N2~9T$,$J$$>l9g$K(B
>>> (vi $B$N$h$&$K(B)$B<+F0E*$KJd$&$h$&$J@_Dj$r$7$h$&$H;W$C$F$$$^$9!#(B
>
>require-final-newline $B$H$$$&JQ?t$,MxMQ$G$-$k$N$G$O!)(B

  $B$J$k$[$I!"$d$O$j$=$&$$$&JQ?t$O$"$k$N$G$9$M!#$G$b;DG0$J$,$i!"$3(B
$B$l$G$O%P%$%J%j%U%!%$%k$G$b2~9T$,A^F~$5$l$F$7$^$&$h$&$G$9!#$^$"%P(B
$B%$%J%j%U%!%$%k$r(B Emacs $B$GJT=8$7$h$&$H$$$&;d$,(B illegal $B$J$N$G$7$g(B
$B$&$,!#(B


fj.editor.mule $B$N(B <281zodv27n.fsf@kchisa.ga.sony.co.jp> $B$N5-;v$K$*$$$F(B
 1998-10-13($B2P(B) 07:34$B:"!"(Byamaoka@ga.sony.co.jp$B$5$s$O=q$-$^$7$?!#(B

>$B%P%$%J%j%G!<%?$r<j:n6H$GJT=8$9$k$3$H$O$^$:L5$/$F!"BgDq$O%W%m%0%i%`$NCf(B
>$B$G9T$J$o$l$^$9$h$M!#$=$&$$$&>l9g(B
>
>  file-coding-system $B$+!"$=$l$h$jM%@hEY$,9b$$(B output-coding-system $B$,(B
>  *noconv* $B$K$J$C$F$$$F!"(B
>  $B%U%!%$%k$K=q$-=P$94X?t$O(B write-file-hooks $B$,8z$+$J$$4X?t$,;H$o$l$k(B
>
>$B$3$H$,B?$$$N$G$O$J$$$+$H;W$&$N$G!"$3$&$$$&$N$b;H$($k$+$b$7$l$^$;$s!#(B
>
>(setq write-region-pre-hook
>      (function
>       (lambda (&rest args)
>	 (or (eq *noconv* output-coding-system)
>	     (eq *noconv* file-coding-system)
>	     (eq ?\n (char-before (point-max))
>	     (progn
>	       (goto-char (point-max))
>	       (insert "\n")))
>	 nil)))

>	     (eq ?\n (char-before (point-max))
$B$NItJ,$O(B
>	     (eq ?\n (char-before (point-max)))
$B$G$h$m$7$$$G$7$g$&$+!#(B

  $B0l1~;W$C$?DL$j$N5sF0$O$9$k$N$G$9$,!"$J$<$+Jd$o$l$?2~9T$,J]B8$5(B
$B$l$^$;$s!#(Bwrite-region $B$,8F$P$l$?;~E@$G!"4{$K=q$-=P$5$l$k(B region 
$B$,7h$a$i$l$F$$$F!"2~9T$rJd$C$F$b$=$NJ8;z$,(B region $B30$G$"$k$H$$$&(B
$B$N$,860x$N$h$&$J5$$,CW$7$^$9!#(B

  $B$=$3$G(B
(add-hook 'write-file-hooks
	  '(lambda ()
	     (or (eq *noconv* output-coding-system)
		 (eq *noconv* file-coding-system)
		 (eq ?\n (char-before (point-max)))
		 (progn
		   (goto-char (point-max))
		   (insert "\n")))
	     nil))
$B$H$7$F$_$^$7$?!#(Bor $BJ8$O$3$&$$$&Iw$K;H$&$N$G$9$M!#$*$+$2$G$9$C$-(B
$B$j=q$1$^$7$?!#(B

  $B$3$l$GEv=i$NL\E*$r<B8=$G$-$^$7$?!#$"$j$,$H$&$4$6$$$^$9!#(B
  $B$J$*%P%$%J%j%U%!%$%k$NJT=8$OIaCJ$OI,MW$J$$$N$G$9$,!"%W%m%0%i%`(B
$B$N%j%s%/$7$F$$$k%i%$%V%i%j$N(B version $B$r=q$-49$($?$j!"FI$_9~$`@_(B
$BDj%U%!%$%k$N%G%U%)%k%HCM$r=q$-49$($?$j!"$H<j:n6H$G:n6H$9$k>l9g$b(B
$B$^$^$"$k$N$G!":#2s$N$h$&$J<ALd$H$J$j$^$7$?!#(B

  $B$*Ez$($$$?$@$$$?@wC+$5$s!";32,$5$s!"$I$&$b$"$j$,$H$&$4$6$$$^$7(B
$B$?!#(B
--
$BB@EDK'I'(B(Yoshihiko Ohta)  $BC^GHBg3X!!%P%$%*%7%9%F%`8&5f2J(B
E-mail: yohta@bres.tsukuba.ac.jp
$B!V$*$h$=CO$+$i$O$(=P$k?"J*$KH~$7$/$J$$$H;W$&$b$N$O0l$D$b$J$+$C$?!W(B
$B!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!;{EDFRI'(B