summaryrefslogtreecommitdiff
path: root/lisp/emulation
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-06-22 05:11:36 +0000
committerRichard M. Stallman <rms@gnu.org>1995-06-22 05:11:36 +0000
commit9a62cb631928b99c7c263e2d24669999b0de8453 (patch)
treed596238bdc860b68363a3a287f4948a87b79ec67 /lisp/emulation
parenta814e9df17de37808432cb26c24e26e93fb8dc35 (diff)
downloademacs-9a62cb631928b99c7c263e2d24669999b0de8453.tar.gz
(vip-push-mark-silent): Use (mark t).
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/vip.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el
index 50a254dfc09..c887d9123e0 100644
--- a/lisp/emulation/vip.el
+++ b/lisp/emulation/vip.el
@@ -136,7 +136,7 @@ bound to delete-backward-char.")
(defun vip-push-mark-silent (&optional location)
"Set mark at LOCATION (point, by default) and push old mark on mark ring.
No message."
- (if (null (mark))
+ (if (null (mark t))
nil
(setq mark-ring (cons (copy-marker (mark-marker)) mark-ring))
(if (> (length mark-ring) mark-ring-max)