Mercurial > emacs
comparison lisp/ibuf-ext.el @ 44190:598fbedb891e
(operation query-replace): Use new `noerror' arg for
`query-replace-read-args'.
(operation query-replace-regexp): Ditto
| author | Colin Walters <walters@gnu.org> |
|---|---|
| date | Wed, 27 Mar 2002 22:37:42 +0000 |
| parents | 9ea4e6199d1c |
| children | 3e16ea61b8c4 |
comparison
equal
deleted
inserted
replaced
| 44189:ee2adfa7e248 | 44190:598fbedb891e |
|---|---|
| 321 t)) | 321 t)) |
| 322 | 322 |
| 323 (define-ibuffer-op query-replace (&rest args) | 323 (define-ibuffer-op query-replace (&rest args) |
| 324 "Perform a `query-replace' in marked buffers." | 324 "Perform a `query-replace' in marked buffers." |
| 325 (:interactive | 325 (:interactive |
| 326 (query-replace-read-args "Query replace" t) | 326 (query-replace-read-args "Query replace" t t) |
| 327 :opstring "replaced in" | 327 :opstring "replaced in" |
| 328 :complex t | 328 :complex t |
| 329 :modifier-p :maybe) | 329 :modifier-p :maybe) |
| 330 (save-window-excursion | 330 (save-window-excursion |
| 331 (switch-to-buffer buf) | 331 (switch-to-buffer buf) |
| 336 t)) | 336 t)) |
| 337 | 337 |
| 338 (define-ibuffer-op query-replace-regexp (&rest args) | 338 (define-ibuffer-op query-replace-regexp (&rest args) |
| 339 "Perform a `query-replace-regexp' in marked buffers." | 339 "Perform a `query-replace-regexp' in marked buffers." |
| 340 (:interactive | 340 (:interactive |
| 341 (query-replace-read-args "Query replace regexp" t) | 341 (query-replace-read-args "Query replace regexp" t t) |
| 342 :opstring "replaced in" | 342 :opstring "replaced in" |
| 343 :complex t | 343 :complex t |
| 344 :modifier-p :maybe) | 344 :modifier-p :maybe) |
| 345 (save-window-excursion | 345 (save-window-excursion |
| 346 (switch-to-buffer buf) | 346 (switch-to-buffer buf) |