Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
1542ad37
Commit
1542ad37
authored
Nov 08, 1993
by
Richard M. Stallman
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(jump-to-register): Rename prefix arg to DELETE and invert its sense.
parent
5da841d2
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
5 additions
and
4 deletions
+5
-4
lisp/register.el
lisp/register.el
+5
-4
No files found.
lisp/register.el
View file @
1542ad37
...
...
@@ -74,21 +74,22 @@ Argument is a character, naming the register."
(
set-register
char
(
current-frame-configuration
)))
(
defalias
'register-to-point
'jump-to-register
)
(
defun
jump-to-register
(
char
&optional
no
delete
)
(
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
(
no
t
delete
))
)
((
window-configuration-p
val
)
(
set-window-configuration
val
))
((
markerp
val
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment