diff options
| author | Gerd Moellmann | 1999-09-02 20:35:50 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 1999-09-02 20:35:50 +0000 |
| commit | 280decf4d1b33103c7cb18231dc78b04f50906fb (patch) | |
| tree | 8926d061ea9e73559c8e94ba6cbddd450a819fdf | |
| parent | 931d90250ee7aa862ddb83a5b837f7a53fd932bd (diff) | |
| download | emacs-280decf4d1b33103c7cb18231dc78b04f50906fb.tar.gz emacs-280decf4d1b33103c7cb18231dc78b04f50906fb.zip | |
(next-history-element): Use minibuffer-prompt-end once
again. Remove test for minibuffer-prompt-in-buffer.
| -rw-r--r-- | lisp/simple.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 418dd71ad5d..89033f82688 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -794,9 +794,7 @@ An uppercase letter in REGEXP makes the search case-sensitive." | |||
| 794 | (let ((print-level nil)) | 794 | (let ((print-level nil)) |
| 795 | (prin1-to-string elt)) | 795 | (prin1-to-string elt)) |
| 796 | elt)) | 796 | elt)) |
| 797 | (if (boundp 'minibuffer-prompt-in-buffer) | 797 | (goto-char (minibuffer-prompt-end))))) |
| 798 | (goto-char (minibuffer-prompt-width)) | ||
| 799 | (goto-char (point-min)))))) | ||
| 800 | 798 | ||
| 801 | (defun previous-history-element (n) | 799 | (defun previous-history-element (n) |
| 802 | "Inserts the previous element of the minibuffer history into the minibuffer." | 800 | "Inserts the previous element of the minibuffer history into the minibuffer." |