diff options
| author | Glenn Morris <rgm@gnu.org> | 2013-11-30 00:42:28 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2013-11-30 00:42:28 -0800 |
| commit | 3e2fb4db3f517dd051cd35c742355c492e085333 (patch) | |
| tree | de82aeb80b27e6fa59ee52edb9dcff10e2159054 /lisp/replace.el | |
| parent | 44ad1cf76039dc5a2a94e82a6b6eb13124c3cc92 (diff) | |
| download | emacs-3e2fb4db3f517dd051cd35c742355c492e085333.tar.gz | |
Make the `interactive-only' bytecomp warning like the `obsolete' one
* emacs-lisp/bytecomp.el (byte-compile-form):
Make the `interactive-only' warning like the `obsolete' one.
* comint.el (comint-run):
* files.el (insert-file-literally, insert-file):
* replace.el (replace-string, replace-regexp):
* simple.el (beginning-of-buffer, end-of-buffer, delete-backward-char)
(goto-line, insert-buffer, next-line, previous-line):
Tweak `interactive-only' spec.
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index 0490af71358..061300c7829 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -524,7 +524,7 @@ and TO-STRING is also null.)" (region-end))))) (perform-replace from-string to-string nil nil delimited nil nil start end)) (put 'replace-string 'interactive-only - "Use `search-forward' and `replace-match' instead.") + "use `search-forward' and `replace-match' instead.") (defun replace-regexp (regexp to-string &optional delimited start end) "Replace things after point matching REGEXP with TO-STRING. @@ -593,7 +593,7 @@ which will run faster and will not set the mark or print anything." (region-end))))) (perform-replace regexp to-string nil t delimited nil nil start end)) (put 'replace-regexp 'interactive-only - "Use `re-search-forward' and `replace-match' instead.") + "use `re-search-forward' and `replace-match' instead.") (defvar regexp-history nil |