summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/minibuffer.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index 44226449af2..41eb95fd20f 100644
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -4399,9 +4399,9 @@ after the end of the prompt, move to the end of the prompt.
Otherwise move to the start of the buffer."
(declare (interactive-only "use `(goto-char (point-min))' instead."))
(interactive "^P")
- (when (or (consp arg)
- (region-active-p))
- (push-mark))
+ (or (consp arg)
+ (region-active-p)
+ (push-mark))
(goto-char (cond
;; We want to go N/10th of the way from the beginning.
((and arg (not (consp arg)))