Re: Interative batch query-replace question

[Andreas Röhler]

Am Donnerstag, 29. November 2007 06:56 schrieb Ke Lu:
> Sorry, I forgot to move point to the begining of buffer,
> It is ok now.
>
> But dired-do-query-replace-regexp still have some peoblem.
> My function looks like:
> (defadvice query-replace-regexp (before
> move-start-after-query-replace-regexp activate)
>   (goto-char (point-min)))
>
>   (defun batch-query-replace-regexp()
>     (interactive)
>       (switch-to-buffer "*Find*")
>       (dired-do-query-replace-regexp "jp\\.co" "jp.co2")
>       (switch-to-buffer "*Find*")
>        (dired-do-query-replace-regexp "java" "java2")
>   )
>
> But the second one can't be executed and there is not any
> error message.
> What is the reason?
>
> Ke Lu <lu@luxdo.jp> writes:
> > I want to do a Interative batch query-replace which looks like:
> > (defun a-batch-query-relace()
> > (interactive)
> > (query-replace "jp.co" "jp.co2")
> > (query-replace "java" "java2")
> > .....
> > )
> > But only first query-replace be excuted,I would like  to know why
> > and how to solve it.
>
> _______________________________________________

Same problem?