diff options
| author | E. Choroba | 2017-12-03 17:59:03 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2017-12-03 17:59:03 +0200 |
| commit | 1fdac2d65c7134a2e1261bf7ad32d275f37da0dc (patch) | |
| tree | 0880e8707798c7f086b5336654e3b607a717a33b | |
| parent | de68f337e36be7a40e5997ad6682770c42535c25 (diff) | |
| download | emacs-1fdac2d65c7134a2e1261bf7ad32d275f37da0dc.tar.gz emacs-1fdac2d65c7134a2e1261bf7ad32d275f37da0dc.zip | |
Don't add newlines in minibuffer history
* lisp/simple.el (next-line-or-history-element): Bind
next-line-add-newlines to nil. (Bug#29529)
Copyright-paperwork-exempt: yes
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index e51c9ac043c..300d9772e9e 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -2109,6 +2109,8 @@ next element of the minibuffer history in the minibuffer." | |||
| 2109 | (interactive "^p") | 2109 | (interactive "^p") |
| 2110 | (or arg (setq arg 1)) | 2110 | (or arg (setq arg 1)) |
| 2111 | (let* ((old-point (point)) | 2111 | (let* ((old-point (point)) |
| 2112 | ;; Don't add newlines if they have the mode enabled globally. | ||
| 2113 | (next-line-add-newlines nil) | ||
| 2112 | ;; Remember the original goal column of possibly multi-line input | 2114 | ;; Remember the original goal column of possibly multi-line input |
| 2113 | ;; excluding the length of the prompt on the first line. | 2115 | ;; excluding the length of the prompt on the first line. |
| 2114 | (prompt-end (minibuffer-prompt-end)) | 2116 | (prompt-end (minibuffer-prompt-end)) |