changeset 54887:a19fbbfac280

(posn-set-point): Fix typos: parameter is `position', not `posn'.
author John Paul Wallington <jpw@pobox.com>
date Wed, 14 Apr 2004 20:31:37 +0000
parents 476bf87a815c
children 89ed55db7532
files lisp/subr.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/subr.el	Wed Apr 14 20:16:05 2004 +0000
+++ b/lisp/subr.el	Wed Apr 14 20:31:37 2004 +0000
@@ -731,11 +731,11 @@
 (defun posn-set-point (position)
   "Move point to POSITION.
 Select the corresponding window as well."
-    (if (not (windowp (posn-window posn)))
+    (if (not (windowp (posn-window position)))
 	(error "Position not in text area of window"))
-    (select-window (posn-window posn))
-    (if (numberp (posn-point posn))
-	(goto-char (posn-point posn))))
+    (select-window (posn-window position))
+    (if (numberp (posn-point position))
+	(goto-char (posn-point position))))
 
 (defsubst posn-x-y (position)
   "Return the x and y coordinates in POSITION.