# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 752764471 0
# Node ID ad035a2d8e26a4dbf01fc1374b9dac9357b86f47
# Parent  04dee67f86cf7fd8c304b1f68bb6b6185ec13301
(jump-to-register): Rename prefix arg to DELETE and invert its sense.

diff -r 04dee67f86cf -r ad035a2d8e26 lisp/register.el
--- a/lisp/register.el	Mon Nov 08 13:14:05 1993 +0000
+++ b/lisp/register.el	Mon Nov 08 13:14:31 1993 +0000
@@ -74,21 +74,22 @@
   (set-register char (current-frame-configuration)))
 
 (defalias 'register-to-point 'jump-to-register)
-(defun jump-to-register (char &optional nodelete)
+(defun jump-to-register (char &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'.)
 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.
-Optional second arg non-nil (interactively, prefix argument) says not to
-delete any existing frames when restoring a frame configuration."
+Optional second arg non-nil (interactively, prefix argument) says to
+delete any existing frames that the frame configuration doesn't mention.
+\(Otherwise, these frames are made invisible.)"
   (interactive "cJump to register: \nP")
   (let ((val (get-register char)))
     (cond
      ((and (fboundp 'frame-configuration-p)
 	   (frame-configuration-p val))
-      (set-frame-configuration val nodelete))
+      (set-frame-configuration val (not delete)))
      ((window-configuration-p val)
       (set-window-configuration val))
      ((markerp val)