04/10/09 00:41:21.net
あげる
(defun my-kill-whole-line (&optional arg)
(interactive)
(let ((kill-whole-line t))
(save-excursion
(beginning-of-line)
(kill-line arg))))
04/10/09 00:41:21.net
あげる
(defun my-kill-whole-line (&optional arg)
(interactive)
(let ((kill-whole-line t))
(save-excursion
(beginning-of-line)
(kill-line arg))))