Article View: fj.editor.emacs
Article #3297Re: How to utilize Emacs well sans effort. #2
From: MASUTANI Yasuhiro
Date: Fri, 21 Feb 1992 05:03
Date: Fri, 21 Feb 1992 05:03
64 lines
3499 bytes
3499 bytes
$@>#C+!wBg:eBg3X$G$9!%(J
$@;d$N0J2<$NMM$J<ALd$KBP$7$F?'!9$J2r$r65$($FD:$-$^$7$?!%(J
> $@;d$O!$%U%!%$%k$NKvHx$NITMW$J6u9T$r>C$9$?$a$K!$8+$($F$$$k:G8e$N9T$N<!$N(J
> $@9T$N@hF,$G(JBELL$@$,LD$k$^(J$@$G(JC-k$@$r2!$7B3$1$k$H$$$&$3$H$r$d$C$F$$$^$7$?!J$3(J
> $@$s$J$3$H$7$^$;$s$+!)!K!%$7$+$7!$(Jkill-line-twice$@$G$O(J$@$3$l$,$G$-$^$;$s!%(J
> $@2?$+NI$$<j$O$"$j$^$;$s$+!)(J
$@$^$:!$(Jkill-line-twice$@$N2~NI$K4X$7$F$O!$A0ED!wElBg$5(J$@$s$H>.D90f!w#N#N#T(J
$@$5$s$+$i65$($FD:$-$^$7$?!%;d$OA0ED$5$s$NJ}K!$r:NMQ$7$^$7$?!%(J
(defun kill-line-twice (&optional numlines)
"Acts like normal kill except kills entire line if at beginning"
(interactive "*p")
(cond ((eobp) (signal 'end-of-buffer nil))
((or (bolp)
(> numlines 1))
(kill-line numlines))
(t (kill-line))))
(global-set-key "\C-k" 'kill-line-twice)
$@$3$l$G!$%P%C%U%!(J$@$N:G8e$K5o$k;~$K$O(J`End of Buffer'$@$N7Y9p$,=P$^$9!%(J
$@$=$l$+$i!$$D$$$G$K65$($FD:$-$?$$$N$G$9$,!$(J
(> numlines 1)
$@$H$J$C$F$$$k$N$G!$?t0z?t$,(J1$@$h$jBg$-$$>l9g$K$b(J kill-line$@$rM>J,$K(J1$@2s<B(J
$@9T$9$k$O$:$@$H;W(J$@$&$N$G$9$,!$(J
`2 M-x kill-line' $@$H(J `2 M-x kill-line-twice'
$@$r$d$C$F$_$^$7$?$,!$F0:n$N0c$$$,$h$/$o$+(J$@$j$^$;$s!%(J
$@<!$K!$%P%C%U%!$N:G8e$N6u9T$r>C$9J}K!$G$9$,(J.....
$@A0ED!wElBg$5$s!'(J
> $@;d$O(J C-x C-o (delete-blank-lines) $@$r;H$$$^$9!#(J
> $@!V(JBELL$@$,LD$k$^$G!W$N$h$&$JH=Dj$rI,MW$H$;$:0lH/$G(J
> $@$G$-$^$9!#(J
$@>.@n!w(J$@%;%3%`$5$s!'(J
> $@;d$O%U%!%$%kKvHx$N6u9T$r>C$9;~$O(J M-z (zap-to-char) $@$r;H$C(J
> $@$F$^$9!%$3$l$@$H6u9T$@(J$@$1$8$c$J$/$F!V$3$C$+$i@h%U%!%$%k$N:G8e(J
> $@$^$GA4It>C$7$?$$!W$H$$$&;~$K$b;H$($FJXMx$G$9!%(J
$@1IED!w#P#F#U(J$@$5$s(J
> $@$\$/$O!"(JM-> C-w$@$G>C$7$F$^$9$h!#(J
$@C1$K!$;d$NCN$C$F$$$k%-!<%P%$%s%I$,>/$J$+$C$?$H$$$&$3$H$G$9$M(J$@!%$?$@$7!$(J
$@$A$g$C$H8@$$Lu$9$k$H!$8+$($F$$$k:G8e$N9T$N$9$02<$G!H$?$V$s$3$3$,%P%C%U%!(J
$@$N:G8e$@$m$&$1$I!$(J$@M>J,$J6u9T$,L5$$$+3NG'$7$h$&!I$H$$$&$H$-$K$O!$(JC-k$@$O(J
$@#1%9%H%m!<%/$G$9$+$i5$7Z$G$$$$$8$c$J$$$G$9$+(J:-)$@!%(J
MS-DOS$@$N%(%G%#%?$G$O!$(JEOF$@%^!<%/$,$h$/I=<($5$l$F$$$^$9$,!$F1$8$h$&$J$3(J
$@$H$r(JEmacs$@$G$d$k;n$_$O$"$j$^$9(J$@$+!)(Jvi$@$NMM$K%P%C%U%!$N:G8e$h$j8e$O(J`~'$@$rI=(J
$@<($9$k$H$+!%(J
--
===============================================================
$@>#C+!!J]Gn(J 563 $@Bg:eI\K-Cf;TBT7s;3D.(J1-1
Tel: 06-844-1151 $@Fb@~(J 4506
$@Bg:eBg3X(J $@4pAC9)3XIt(J $@5!3#9)3X2J(J Fax: 06-843-9730 $@D>DL(J
Technical Details
Message-ID:
<E64022A.92Feb21140305@ccsparc01.center.osaka-u.ac.jp>Path:
arc1-ca.pugleaf.net!sparky!uunet!think.com!mips!panasonic.com!chorus.mei!icspub!ccsparc01!e64022aReferences:
<NK.92Feb11234420@fubuki.ics.osaka-u.ac.jp> <E64022A.92Feb17011955@ccsparc01.center.osaka-u.ac.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: ff358,f81c01cb8bd2b987 X-Google-Attributes: gidff358,public X-Google-ArrivalTime: 1992-02-21 03:17:19 PST Path: arc1-ca.pugleaf.net!sparky!uunet!think.com!mips!panasonic.com!chorus.mei!icspub!ccsparc01!e64022a From: e64022a@center.osaka-u.ac.jp (MASUTANI Yasuhiro) Newsgroups: fj.editor.emacs Subject: Re: How to utilize Emacs well sans effort. #2 Message-ID: <E64022A.92Feb21140305@ccsparc01.center.osaka-u.ac.jp> Date: 21 Feb 92 05:03:05 GMT References: <NK.92Feb11234420@fubuki.ics.osaka-u.ac.jp> <E64022A.92Feb17011955@ccsparc01.center.osaka-u.ac.jp> Sender: news@ccsparc01.center.osaka-u.ac.jp Distribution: fj Organization: Computation Center, Osaka University., JAPAN Lines: 64 In-reply-to: e64022a@ccsparc01.center.osaka-u.ac.jp's message of 16 Feb 92 16:19:55 GMT