Re: Interative batch query-replace question

[Ke Lu <lu@luxdo.jp>]

The problem is:
 (defun batch-query-replace-regexp()
   (interactive)
     (switch-to-buffer "*Find*")
     (dired-do-query-replace-regexp "jp\\.co" "jp.co2")
->can't reach here     (switch-to-buffer "*Find*")
      (dired-do-query-replace-regexp "java" "java2")
 )

Ke Lu <lu@luxdo.jp> writes:

> Yes,Only the first one is executed.
>
> Andreas Röhler <andreas.roehler@online.de> writes:
>
>> 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?