🚀 go-pugleaf

$@Bg:eBg3X$N>#C+$G$9!%(J

$@8ENS$5$s$N%l%/%A%c%"$r3Z$7$_$KFI$^$;$F$b$i$C$F$$$^$9!%(J

In article <NK.92Feb11234420@fubuki.ics.osaka-u.ac.jp> 
nk@ics.osaka-u.ac.jp (Noriya KOBAYASHI) writes:

 > \begin{origami}
 > 	   $@0l9T:o=|$r8zN(E*$K!#(JC-k $@$G?t9T$r:o=|$7$?$3$H$N$"$k?M$O$*J,$+$j(J
 > 	   $@$G$7$g$&$,!"0l2s$a$N(JC-k$@$G9TKv$^$G$,:o=|$5$l$^$9!#Fs2sL\$N(JC-k$@$G(J
 > 	   $@@h$N(JC-k$@$G6u9T$H$J$C$?9T$,$J$/$J$j$^$9!#$h$&$9$k$K0l9T$"$?$jFs(J
 > 	   $@2s$N(JC-k$@$,I,MW$H$J$j$^$9!#$=$3$G!"$3$N<j4V$r>J$/$N$,<!$N(J elips
 > 	   code $@$G$9!#$3$l$r(J .emacs $@$KF~$l$l$P!"9TF,$G(JC-k$@$7$?>l9g$K$O!"0l(J
 > 	   $@EY$G0l9T$^$k$^$k:o=|$7$F$/$l$F!"9TF,0J30$N>l9g$ODL>o$H$*$J$8?6(J
 > 	   $@Iq$$$r$7$^$9!#(J
 > 
 > 	   \begin{install}
 > 
 > 	   (defun kill-line-twice (&optional numlines)
 > 	     "Acts like normal kill except kills entire line if at beginning"
 > 	     (interactive "p")
 > 	     (cond ((or (= (current-column) 0)
 > 			(> numlines 1))
 > 		    (kill-line numlines))
 > 		   (t (kill-line))))
 > 	   (global-set-key "\C-k" 'kill-line-twice)
 > 
 > 	   \end{install}
 > 
 > \end{origami}

$@$5$C$=$/!$$d$C$F$_$^$7$?!%;H$$$d$9$/$J$C$?$N$G$9$,!$(J1$@$DITK~$,$"$j$^$9!%(J

$@%P%C%U%!$N:G8e$G!J#1$D<jA0$O2~9T!K(JC-k$@$7$F$b(J"End of Buffer"$@$N(JBELL$@$,LD$C(J
$@$F$/$l$^$;$s!%(JESC 2 ESC x kill-line$@$H$d$C$F$b!$$d$O$j(JBELL$@$OLD$i$J$$$N(J
$@$G$3$l$O%*%j%8%J%k$N(Jkill-line$@$N;EMM$J$N$G$7$g$&$+!%(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$^$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$3$l$,$G$-$^$;$s!%(J
$@2?$+NI$$<j$O$"$j$^$;$s$+!)(JElisp$@$N%l%/%A%c%"$N:]$KNcBj$H$7$F$G$b<h$j>e(J
$@$2$FD:$1$l$P9,$$$G$9!%(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