Article View: fj.editor.mule
Article #3186Re: How to end-key
From: Akio Tokaji
Date: Mon, 05 Feb 1996 00:00
Date: Mon, 05 Feb 1996 00:00
41 lines
1568 bytes
1568 bytes
$B8M3a!wIY;NDL$G$9!#(B
$B$$$$$3$H$r;W$$$D$-$^$7$?(B(^^)/$B!#(B
(1) .emacs $B$K0J2<$rF~$l$F$*$-$^$9!#(B
(progn
(defun newline-special () (interactive)
(let ( end-flag )
(setq end-flag
(and (eobp)
(save-excursion
(beginning-of-line)
(looking-at "\\([.]\\|end\\)$"))))
(if (not end-flag)
(call-interactively 'newline)
(delete-region (point) (progn (beginning-of-line) (point)))
(save-buffers-kill-emacs t)
)
)
)
(defun special-editor-mode ()
(global-set-key "\C-m" 'newline-special)
)
)
(2) .cshrc $B$K0J2<$rF~$l$F$*$-$^$9(B(`se' $B$O!"(Bspecial editor $B$NN,(B)$B!#(B
alias se 'mule -f special-editor-mode'
(3) $B%3%^%s%I%i%$%s$G0J2<$N$h$&$K$7$^$9!#(B
% se
$B$^$?$O(B
% se mail.txt
--
$B8M3a(B $BL@IW(B ($B$H$+$8(B $B$"$-$*(B)
$BIY;NDL(B($B3t(B) $B%_%I%k%&%'%";v6HK\It(B $BBh0l%_%I%k%&%'%";v6HIt(B $BBh0l3+H/It(B
E-mail:tokaji@db.nm.fujitsu.co.jp (Nifty:GDG02564) Tel:045-471-0294
Technical Details
Message-ID:
<TOKAJI.96Feb5205505@zaurus>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<4f2pk0$5m7@minerva.pl-gakuen.ac.jp> <TOKAJI.96Feb5202544@zaurus>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 10eba4,b6e1f73df748b4e X-Google-Attributes: gid10eba4,public From: tokaji@db.nm.fujitsu.co.jp (Akio Tokaji) Subject: Re: How to end-key Date: 1996/02/05 Message-ID: <TOKAJI.96Feb5205505@zaurus> X-Deja-AN: 138068277 distribution: fj references: <4f2pk0$5m7@minerva.pl-gakuen.ac.jp> <TOKAJI.96Feb5202544@zaurus> organization: Fujitsu Ltd., Shin-yokohama, Kanagawa, Japan newsgroups: fj.editor.mule