Mercurial > emacs
comparison lisp/macros.el @ 2753:c824ba373cc2
(kbd-macro-query): Fix prompt string.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 12 May 1993 23:56:18 +0000 |
| parents | a9d400ee1c0e |
| children | 507f64624555 |
comparison
equal
deleted
inserted
replaced
| 2752:93eda5bbc4df | 2753:c824ba373cc2 |
|---|---|
| 126 (if (not executing-macro) | 126 (if (not executing-macro) |
| 127 nil | 127 nil |
| 128 (let ((loop t) | 128 (let ((loop t) |
| 129 (msg (substitute-command-keys | 129 (msg (substitute-command-keys |
| 130 "Proceed with macro?\\<query-replace-map>\ | 130 "Proceed with macro?\\<query-replace-map>\ |
| 131 (\\[act], \\[skip], \\[exit], \\[recenter], \\[edit]"))) | 131 (\\[act], \\[skip], \\[exit], \\[recenter], \\[edit]) "))) |
| 132 (while loop | 132 (while loop |
| 133 (let ((key (let ((executing-macro nil) | 133 (let ((key (let ((executing-macro nil) |
| 134 (defining-kbd-macro nil)) | 134 (defining-kbd-macro nil)) |
| 135 (message msg) | 135 (message msg) |
| 136 (read-event))) | 136 (read-event))) |