Don't move point to the prompt in previous-line-or-history-element (bug#46033)

* lisp/simple.el (previous-line-or-history-element):
Avoid moving point to the prompt.

diff --git a/lisp/simple.el b/lisp/simple.el
index 8d4e4a7a6bb17a64b13ad493d193c6fe0a919429..c878fdab92103464deb60e2e3c6782a37b871af1 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2476,7 +2476,10 @@ previous element of the minibuffer history in the minibuffer."
                         (current-column)))))
     (condition-case nil
        (with-no-warnings
-         (previous-line arg))
+         (previous-line arg)
+          ;; Avoid moving point to the prompt
+          (when (< (point) (minibuffer-prompt-end))
+            (signal 'beginning-of-buffer nil)))
       (beginning-of-buffer
        ;; Restore old position since `line-move-visual' moves point to
        ;; the beginning of the line when it fails to go to the previous line.