Mercurial > emacs
changeset 70963:098d9b195f6e
(comint-kill-whole-line): Rename arg to count. Fix
doc string.
| author | Reiner Steib <Reiner.Steib@gmx.de> |
|---|---|
| date | Fri, 26 May 2006 16:44:53 +0000 |
| parents | 72943032cdc2 |
| children | e5adfcfcffa0 |
| files | lisp/ChangeLog lisp/comint.el |
| diffstat | 2 files changed, 11 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri May 26 15:22:24 2006 +0000 +++ b/lisp/ChangeLog Fri May 26 16:44:53 2006 +0000 @@ -1,3 +1,8 @@ +2006-05-26 Reiner Steib <Reiner.Steib@gmx.de> + + * comint.el (comint-kill-whole-line): Rename arg to count. Fix + doc string. + 2006-05-26 Chong Yidong <cyd@stupidchicken.com> * files.el (backup-buffer-copy): Remove deleted MUSTBENEW argument
--- a/lisp/comint.el Fri May 26 15:22:24 2006 +0000 +++ b/lisp/comint.el Fri May 26 16:44:53 2006 +0000 @@ -2357,19 +2357,19 @@ (when (eq (get-text-property (1- pt) 'read-only) 'fence) (remove-list-of-text-properties (1- pt) pt '(read-only))))))) -(defun comint-kill-whole-line (&optional arg) +(defun comint-kill-whole-line (&optional count) "Kill current line, ignoring read-only and field properties. -With prefix arg, kill that many lines starting from the current line. -If arg is negative, kill backward. Also kill the preceding newline, +With prefix arg COUNT, kill that many lines starting from the current line. +If COUNT is negative, kill backward. Also kill the preceding newline, instead of the trailing one. \(This is meant to make \\[repeat] work well with negative arguments.) -If arg is zero, kill current line but exclude the trailing newline. +If COUNT is zero, kill current line but exclude the trailing newline. The read-only status of newlines is updated with `comint-update-fence', if necessary." (interactive "p") (let ((inhibit-read-only t) (inhibit-field-text-motion t)) - (kill-whole-line arg) - (when (>= arg 0) (comint-update-fence)))) + (kill-whole-line count) + (when (>= count 0) (comint-update-fence)))) (defun comint-kill-region (beg end &optional yank-handler) "Like `kill-region', but ignores read-only properties, if safe.