bug#14909: Subject: 24.3; imag-dired key-bindings not working

[Stefan Monnier]

> !   (let* ((old-buf (current-buffer))
>            (dired-buf (image-dired-associated-dired-buffer))
> !          (file-name (image-dired-original-file-name))
> !          (window (image-dired-get-buffer-window dired-buf)))
>       (when (and (buffer-live-p dired-buf) file-name)
>         (set-buffer dired-buf)
>         (if (not (dired-goto-file file-name))
>             (message "Could not track file")
> !         (if window (set-window-point window (point))))
>         (set-buffer old-buf))))

I see this code could use with-current-buffer.


        Stefan