Mercurial > emacs
comparison lisp/isearch.el @ 50783:f26c6004759f
(isearch-complete): Update isearch-message.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 03 May 2003 13:49:47 +0000 |
| parents | f038a895a805 |
| children | c1f7c7481134 |
comparison
equal
deleted
inserted
replaced
| 50782:1b22075b3bb5 | 50783:f26c6004759f |
|---|---|
| 1517 "Complete the search string from the strings on the search ring. | 1517 "Complete the search string from the strings on the search ring. |
| 1518 The completed string is then editable in the minibuffer. | 1518 The completed string is then editable in the minibuffer. |
| 1519 If there is no completion possible, say so and continue searching." | 1519 If there is no completion possible, say so and continue searching." |
| 1520 (interactive) | 1520 (interactive) |
| 1521 (if (isearch-complete1) | 1521 (if (isearch-complete1) |
| 1522 (isearch-edit-string) | 1522 (progn (setq isearch-message |
| 1523 (mapconcat 'isearch-text-char-description | |
| 1524 isearch-string "")) | |
| 1525 (isearch-edit-string)) | |
| 1523 ;; else | 1526 ;; else |
| 1524 (sit-for 1) | 1527 (sit-for 1) |
| 1525 (isearch-update))) | 1528 (isearch-update))) |
| 1526 | 1529 |
| 1527 (defun isearch-complete-edit () | 1530 (defun isearch-complete-edit () |