diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-11-07 06:13:23 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-11-07 06:13:23 +0000 |
| commit | c2e8a01234419831fd7bdba0098722a4d5e39897 (patch) | |
| tree | d71d6012d116903ab9506c5d72ba5d9f8a6b367b /lisp/simple.el | |
| parent | f90a6155a91dcb39f38508afd8b19155dc78d331 (diff) | |
| download | emacs-c2e8a01234419831fd7bdba0098722a4d5e39897.tar.gz | |
* simple.el (previous-line): Doc fix.
* simple.el (kill-line): Don't shift point before doing the
delete.
Diffstat (limited to 'lisp/simple.el')
| -rw-r--r-- | lisp/simple.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index e849e634a4c..2399733e646 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -816,7 +816,9 @@ When calling from a program, nil means \"no arg\", a number counts as a prefix arg." (interactive "P") (kill-region (point) - (progn + ;; Don't shift point before doing the delete; that way, + ;; undo will record the right position of point. + (save-excursion (if arg (forward-line (prefix-numeric-value arg)) (if (eobp) @@ -1241,7 +1243,7 @@ a semipermanent goal column to which this command always moves. Then it does not try to move vertically. If you are thinking of using this in a Lisp program, consider using -`forward-line' with negative argument instead.. It is usually easier +`forward-line' with a negative argument instead. It is usually easier to use and more reliable (no dependence on goal column, etc.)." (interactive "p") (line-move (- arg)) |