# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 721116803 0
# Node ID fce86d06a7583fe04166b318ddf5536095cdf8c9
# Parent  695c6eb2ff31bd108eec59e2263c26b76684dfbd
	* simple.el (previous-line): Doc fix.

	* simple.el (kill-line): Don't shift point before doing the
	delete.

diff -r 695c6eb2ff31 -r fce86d06a758 lisp/simple.el
--- a/lisp/simple.el	Sat Nov 07 06:12:42 1992 +0000
+++ b/lisp/simple.el	Sat Nov 07 06:13:23 1992 +0000
@@ -816,7 +816,9 @@
 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 @@
 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))