HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
6e18b6c
)
(pop-global-mark): Make pop-global-mark treat
author
Richard M. Stallman
<rms@gnu.org>
Thu, 5 Jan 1995 23:53:01 +0000
(23:53 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Thu, 5 Jan 1995 23:53:01 +0000
(23:53 +0000)
global-mark-ring as a ring.
lisp/simple.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/simple.el
b/lisp/simple.el
index
6583d04
..
378c220
100644
(file)
--- a/
lisp/simple.el
+++ b/
lisp/simple.el
@@
-1518,7
+1518,8
@@
incremental search, \\[beginning-of-buffer], and \\[end-of-buffer]."
(let* ((marker (car global-mark-ring))
(buffer (marker-buffer marker))
(position (marker-position marker)))
- (setq global-mark-ring (cdr global-mark-ring))
+ (setq global-mark-ring (nconc (cdr global-mark-ring)
+ (list (car global-mark-ring))))
(set-buffer buffer)
(or (and (>= position (point-min))
(<= position (point-max)))