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

[Juanma Barranquero]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      09/03/12 12:14:14

Modified files:
        lisp           : ChangeLog register.el 

Log message:
        * register.el (get-register): Rename arg REG to REGISTER for
          consistency with other register functions.
          (set-register, jump-to-register): Fix typos in docstrings.
          (copy-to-register, copy-rectangle-to-register): Reflow docstrings.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15453&r2=1.15454
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/register.el?cvsroot=emacs&r1=1.62&r2=1.63

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15453
retrieving revision 1.15454
diff -u -b -r1.15453 -r1.15454
--- ChangeLog   12 Mar 2009 06:23:35 -0000      1.15453
+++ ChangeLog   12 Mar 2009 12:14:11 -0000      1.15454
@@ -1,3 +1,10 @@
+2009-03-12  Juanma Barranquero  <address@hidden>
+
+       * register.el (get-register): Rename arg REG to REGISTER for
+       consistency with other register functions.
+       (set-register, jump-to-register): Fix typos in docstrings.
+       (copy-to-register, copy-rectangle-to-register): Reflow docstrings.
+
 2009-03-12  Glenn Morris  <address@hidden>
 
        * mail/mailabbrev.el (mail-abbrev-next-line)

Index: register.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/register.el,v
retrieving revision 1.62
retrieving revision 1.63
diff -u -b -r1.62 -r1.63
--- register.el 5 Jan 2009 03:19:42 -0000       1.62
+++ register.el 12 Mar 2009 12:14:14 -0000      1.63
@@ -58,13 +58,13 @@
 A list of the form (FRAME-CONFIGURATION POSITION)
  represents a saved frame configuration plus a saved value of point.")
 
-(defun get-register (reg)
-  "Return contents of Emacs register named REG, or nil if none."
-  (cdr (assq reg register-alist)))
+(defun get-register (register)
+  "Return contents of Emacs register named REGISTER, or nil if none."
+  (cdr (assq register register-alist)))
 
 (defun set-register (register value)
   "Set contents of Emacs register named REGISTER to VALUE.  Returns VALUE.
-See the documentation of the variable `register-alist' for possible VALUE."
+See the documentation of the variable `register-alist' for possible VALUEs."
   (let ((aelt (assq register register-alist)))
     (if aelt
        (setcdr aelt value)
@@ -105,7 +105,7 @@
 (defun jump-to-register (register &optional delete)
   "Move point to location stored in a register.
 If the register contains a file name, find that file.
- \(To put a file name in a register, you must use `set-register'.)
+\(To put a file name in a register, you must use `set-register'.)
 If the register contains a window configuration (one frame) or a frame
 configuration (all frames), restore that frame or all frames accordingly.
 First argument is a character, naming the register.
@@ -288,7 +288,8 @@
   (if (not arg) (exchange-point-and-mark)))
 
 (defun copy-to-register (register start end &optional delete-flag)
-  "Copy region into register REGISTER.  With prefix arg, delete as well.
+  "Copy region into register REGISTER.
+With prefix arg, delete as well.
 Called from program, takes four args: REGISTER, START, END and DELETE-FLAG.
 START and END are buffer positions indicating what to copy."
   (interactive "cCopy to register: \nr\nP")
@@ -325,8 +326,8 @@
 
 (defun copy-rectangle-to-register (register start end &optional delete-flag)
   "Copy rectangular region into register REGISTER.
-With prefix arg, delete as well.  To insert this register
-in the buffer, use \\[insert-register].
+With prefix arg, delete as well.
+To insert this register in the buffer, use \\[insert-register].
 
 Called from a program, takes four args: REGISTER, START, END and DELETE-FLAG.
 START and END are buffer positions giving two corners of rectangle."