🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: fj.editor.mule
Article #874

detect text or binary

#874
From: Yoshihiko OHTA
Date: Mon, 12 Oct 1998 00:00
31 lines
1702 bytes
  $BC^GHBg$NB@ED$G$9!#(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
  write-file-hooks $B$H$$$&JQ?t$r65$($F$$$?$@$$$F!"0l1~L\E*$N%3!<(B
$B%I$O=q$1$?$N$G$9$,!"$G$-$l$P%P%$%J%j%U%!%$%k$G$O$=$N$h$&$J=hM}$r(B
$B$7$J$$$h$&$K$7$?$$$H;W$C$F$$$^$9!#8=:_$O(B Fundamental mode $B$G$O$=(B
$B$N$h$&$J=hM}$r$7$J$$!"$H$$$&$U$&$K$7$F$$$^$9$,!"$b$C$HC1$K(B Emacs
Lisp $B$NCf$G8=:_$N(B buffer $B$,%F%-%9%H$+%P%$%J%j$+!"$H$$$&$N$,$o$+(B
$B$l$P$$$$$J!"$H;W$C$F$$$^$9!#2?$+$=$&$$$&4X?t$O$J$$$G$7$g$&$+!)(B 

  $B$J$*4D6-$O(B Mule 2.3(19.28) $B$G$9!#(B

  $B:#$O0J2<$N$h$&$K$7$F$$$^$9!#8+$h$&8+$^$M$G=q$$$F$$$k$N$G7k9=E,(B
$BEv$G$9$,!D!D!#(B

(add-hook 'write-file-hooks
	    '(lambda ()
	       (and (not (string= "\n" (buffer-substring 
					(- (point-max) 1) (point-max))))
		    (not (equal mode-name "Fundamental"))
		    (progn
		      (goto-char (point-max))
		      (insert "\n")))))

  $B$h$m$7$/$*4j$$$7$^$9!#(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
Technical Details
Message-ID: <6vsjss$s7b$1@nazuna.bres.tsukuba.ac.jp>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS
X-Google-Thread: 10eba4,88f15b973e6c3172,start
X-Google-Attributes: gid10eba4,public
From: yohta@bres.tsukuba.ac.jp (Yoshihiko OHTA)
Subject: detect text or binary
Date: 1998/10/12
Message-ID: <6vsjss$s7b$1@nazuna.bres.tsukuba.ac.jp>
X-Deja-AN: 400189306
Organization: College of Agrobiological Resources, Univ. of Tsukuba
Newsgroups: fj.editor.mule