Continuing after an interactive command?

Continuing after an interactive command?

[gentsquash]

How can I define a function which contains a command that
I interact with, which then continues?

I seek a function like the following, executed when in a
buffer:

  (defun foo ()
    (ns-narrow-to-region 100 200)
    (goto-char (point-min))
    (dired-jump)
    ;; This next cmd interacts with the user.
    (dired-do-query-replace-regexp FROM TO)
    ;; If the above cmd terminates normally, I'd like these
    ;; to be executed:
    (dired-find-file)
    (ns-widen)
    )

Typically, when the `dired-do-query-replace-regexp' runs,
I'll hit "!" to have it do all the replacements.  I then
would like to end up in the buffer, widened.

However, in the above function, when the
`dired-do-query-replace-regexp' terminates, it seems to
terminate `foo' as well.

                        --Jonathan

Re: Continuing after an interactive command?

[Thien-Thi Nguyen]

[-- Attachment #1: Type: text/plain, Size: 1129 bytes --]

() gentsquash <gentsquash@gmail.com>
() Mon, 27 May 2013 19:24:54 -0700 (PDT)

     (defun foo ()
       (ns-narrow-to-region 100 200)
       (goto-char (point-min))
       (dired-jump)
       ;; This next cmd interacts with the user.
       (dired-do-query-replace-regexp FROM TO)
       ;; If the above cmd terminates normally, I'd like these
       ;; to be executed:
       (dired-find-file)
       (ns-widen)
       )

That's like leaving the house and walking around the block (complaining
loudly to annoy the neighbors) to get from the kitchen to the bathroom.
If you really must, then try:

  (ignore-errors
    (save-excursion
      (dired-do-query-replace-regexp FROM TO)))

which catches the throw out of the stateful query-replace loop and
furthermore preserves context such that ‘dired-find-file’ does not
complain.  That is like remembering to lock the door (to thwart
negative neighborly retribution) and bring a key.

But i have to wonder... Why do you treat your neighbors so?
Is it really their business that your soup is too spicy?

-- 
Thien-Thi Nguyen
GPG key: 4C807502

[-- Attachment #2: Type: application/pgp-signature, Size: 197 bytes --]

Re: Continuing after an interactive command?

[gentsquash]

Hello  Thien-Thi Nguyen.

I don't understand your metaphor, but `ignore-errors' is sufficient to
do what I wanted.   Thank you.     -Jonathan