mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(vip-replace-string): Don't use replace-regexp.

Browse source
This commit is contained in:
Richard M. Stallman 1993-12-23 04:53:48 +00:00
parent 5f5d794a22
commit 5975546182
1 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/emulation/vip.el
View file

@ -926,9 +926,13 @@ the query replace mode will toggle between string replace and regexp replace."
(if vip-re-replace "regexp replace"
"string replace"))))
(if vip-re-replace
(replace-regexp
str
(vip-read-string (format "Replace regexp \"%s\" with: " str)))
;; (replace-regexp
;; str
;; (vip-read-string (format "Replace regexp \"%s\" with: " str)))
(while (re-search-forward str nil t)
(replace-match (vip-read-string
(format "Replace regexp \"%s\" with: " str))
nil nil))
(replace-string
str
(vip-read-string (format "Replace \"%s\" with: " str)))))))