emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp ChangeLog simple.el


From: Lute Kamstra
Subject: [Emacs-diffs] emacs/lisp ChangeLog simple.el
Date: Sat, 22 Nov 2008 17:33:10 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Lute Kamstra <lute>     08/11/22 17:33:09

Modified files:
        lisp           : ChangeLog simple.el 

Log message:
        (goto-line): Rename argument.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14832&r2=1.14833
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/simple.el?cvsroot=emacs&r1=1.954&r2=1.955

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14832
retrieving revision 1.14833
diff -u -b -r1.14832 -r1.14833
--- ChangeLog   22 Nov 2008 12:46:03 -0000      1.14832
+++ ChangeLog   22 Nov 2008 17:33:06 -0000      1.14833
@@ -1,3 +1,7 @@
+2008-11-22  Lute Kamstra  <address@hidden>
+
+       * simple.el (goto-line): Rename argument.
+
 2008-11-22  Eli Zaretskii  <address@hidden>
 
        * makefile.w32-in (compile-first): New target.

Index: simple.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/simple.el,v
retrieving revision 1.954
retrieving revision 1.955
diff -u -b -r1.954 -r1.955
--- simple.el   17 Nov 2008 01:54:05 -0000      1.954
+++ simple.el   22 Nov 2008 17:33:09 -0000      1.955
@@ -837,15 +837,16 @@
 
 ;; Counting lines, one way or another.
 
-(defun goto-line (arg &optional buffer)
-  "Goto line ARG, counting from line 1 at beginning of buffer.
-Normally, move point in the current buffer, and leave mark at previous
-position.  With just \\[universal-argument] as argument, move point
-in the most recently displayed other buffer, and switch to it.
-When called from Lisp code, the optional argument BUFFER specifies
-a buffer to switch to.
+(defun goto-line (line &optional buffer)
+  "Goto LINE, counting from line 1 at beginning of buffer.
+Normally, move point in the current buffer, and leave mark at the
+previous position.  With just \\[universal-argument] as argument,
+move point in the most recently selected other buffer, and switch
+to it.  When called from Lisp code, the optional argument BUFFER
+specifies a buffer to switch to.
 
-If there's a number in the buffer at point, it is the default for ARG."
+If there's a number in the buffer at point, it is the default for
+LINE."
   (interactive
    (if (and current-prefix-arg (not (consp current-prefix-arg)))
        (list (prefix-numeric-value current-prefix-arg))
@@ -887,8 +888,8 @@
     (widen)
     (goto-char 1)
     (if (eq selective-display t)
-       (re-search-forward "[\n\C-m]" nil 'end (1- arg))
-      (forward-line (1- arg)))))
+       (re-search-forward "[\n\C-m]" nil 'end (1- line))
+      (forward-line (1- line)))))
 
 (defun count-lines-region (start end)
   "Print number of lines and characters in the region."




reply via email to

[Prev in Thread] Current Thread [Next in Thread]