bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Glenn Morris
Subject: bug#14909: Subject: 24.3; imag-dired key-bindings not working
Date: Fri, 19 Jul 2013 16:23:47 -0400
User-agent: Gnus (www.gnus.org), GNU Emacs (www.gnu.org/software/emacs/)

Thanks, this should fix it:

*** lisp/image-dired.el 2013-01-01 09:11:05 +0000
--- lisp/image-dired.el 2013-07-19 20:21:46 +0000
***************
*** 1035,1049 ****
  See documentation for `image-dired-toggle-movement-tracking'.
  Interactive use only useful if `image-dired-track-movement' is nil."
    (interactive)
!   (let ((old-buf (current-buffer))
          (dired-buf (image-dired-associated-dired-buffer))
!         (file-name (image-dired-original-file-name)))
      (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")
!         (set-window-point
!          (image-dired-get-buffer-window dired-buf) (point)))
        (set-buffer old-buf))))
  
  (defun image-dired-toggle-movement-tracking ()
--- 1035,1049 ----
  See documentation for `image-dired-toggle-movement-tracking'.
  Interactive use only useful if `image-dired-track-movement' is nil."
    (interactive)
!   (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))))
  
  (defun image-dired-toggle-movement-tracking ()






reply via email to

[Prev in Thread] Current Thread [Next in Thread]