Mercurial > emacs
comparison lisp/simple.el @ 83515:f7a396df2380
Merged from emacs@sv.gnu.org
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-263
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-264
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-265
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/gnus--rel--5.10--patch-99
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-100
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-555
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Fri, 05 May 2006 10:30:28 +0000 |
parents | d9f8d2a65d18 dd437ac4b2c6 |
children | 1321f6cfb389 |
comparison
equal
deleted
inserted
replaced
83514:d9f8d2a65d18 | 83515:f7a396df2380 |
---|---|
1267 (previous-matching-history-element regexp (- n))) | 1267 (previous-matching-history-element regexp (- n))) |
1268 | 1268 |
1269 (defvar minibuffer-temporary-goal-position nil) | 1269 (defvar minibuffer-temporary-goal-position nil) |
1270 | 1270 |
1271 (defun next-history-element (n) | 1271 (defun next-history-element (n) |
1272 "Insert the next element of the minibuffer history into the minibuffer." | 1272 "Puts next element of the minibuffer history in the minibuffer. |
1273 With argument N, it uses the Nth following element." | |
1273 (interactive "p") | 1274 (interactive "p") |
1274 (or (zerop n) | 1275 (or (zerop n) |
1275 (let ((narg (- minibuffer-history-position n)) | 1276 (let ((narg (- minibuffer-history-position n)) |
1276 (minimum (if minibuffer-default -1 0)) | 1277 (minimum (if minibuffer-default -1 0)) |
1277 elt minibuffer-returned-to-present) | 1278 elt minibuffer-returned-to-present) |
1310 (prin1-to-string elt)) | 1311 (prin1-to-string elt)) |
1311 elt)) | 1312 elt)) |
1312 (goto-char (or minibuffer-temporary-goal-position (point-max)))))) | 1313 (goto-char (or minibuffer-temporary-goal-position (point-max)))))) |
1313 | 1314 |
1314 (defun previous-history-element (n) | 1315 (defun previous-history-element (n) |
1315 "Inserts the previous element of the minibuffer history into the minibuffer." | 1316 "Puts previous element of the minibuffer history in the minibuffer. |
1317 With argument N, it uses the Nth previous element." | |
1316 (interactive "p") | 1318 (interactive "p") |
1317 (next-history-element (- n))) | 1319 (next-history-element (- n))) |
1318 | 1320 |
1319 (defun next-complete-history-element (n) | 1321 (defun next-complete-history-element (n) |
1320 "Get next history element which completes the minibuffer before the point. | 1322 "Get next history element which completes the minibuffer before the point. |