diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/progmodes/etags.el | 5 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cbdb8f93256..3399fcea80e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2008-01-26 Eli Zaretskii <eliz@gnu.org> | ||
| 2 | |||
| 3 | * progmodes/etags.el (tags-query-replace): Doc fix. | ||
| 4 | |||
| 1 | 2008-01-26 Phil Sung <psung@mit.edu> (tiny change) | 5 | 2008-01-26 Phil Sung <psung@mit.edu> (tiny change) |
| 2 | 6 | ||
| 3 | * wdired.el (wdired-get-filename): Change `(1+ beg)' to `beg' so | 7 | * wdired.el (wdired-get-filename): Change `(1+ beg)' to `beg' so |
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el index edff63acb3f..a22853fb404 100644 --- a/lisp/progmodes/etags.el +++ b/lisp/progmodes/etags.el | |||
| @@ -1820,8 +1820,11 @@ See documentation of variable `tags-file-name'." | |||
| 1820 | Third arg DELIMITED (prefix arg) means replace only word-delimited matches. | 1820 | Third arg DELIMITED (prefix arg) means replace only word-delimited matches. |
| 1821 | If you exit (\\[keyboard-quit], RET or q), you can resume the query replace | 1821 | If you exit (\\[keyboard-quit], RET or q), you can resume the query replace |
| 1822 | with the command \\[tags-loop-continue]. | 1822 | with the command \\[tags-loop-continue]. |
| 1823 | Fourth arg FILE-LIST-FORM non-nil means initialize the replacement loop. | ||
| 1824 | Fifth and sixth arguments START and END are accepted, for compatibility | ||
| 1825 | with `query-replace-regexp', and ignored. | ||
| 1823 | 1826 | ||
| 1824 | See documentation of variable `tags-file-name'." | 1827 | See also documentation of the variable `tags-file-name'." |
| 1825 | (interactive (query-replace-read-args "Tags query replace (regexp)" t t)) | 1828 | (interactive (query-replace-read-args "Tags query replace (regexp)" t t)) |
| 1826 | (setq tags-loop-scan `(let ,(unless (equal from (downcase from)) | 1829 | (setq tags-loop-scan `(let ,(unless (equal from (downcase from)) |
| 1827 | '((case-fold-search nil))) | 1830 | '((case-fold-search nil))) |