[Emacs-diffs] Changes to emacs/lisp/image-mode.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/03/27 14:59:31

Index: image-mode.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/image-mode.el,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -b -r1.40 -r1.41
--- image-mode.el       26 Mar 2008 15:49:03 -0000      1.40
+++ image-mode.el       27 Mar 2008 14:59:29 -0000      1.41
@@ -97,11 +97,11 @@
   ;; When set-window-buffer, set hscroll and vscroll to what they were
   ;; last time the image was displayed in this window.
   (when (listp image-mode-winprops-alist)
-    (let* ((winprops (image-mode-winprops win))
+    (let* ((winprops (image-mode-winprops))
            (hscroll (image-mode-window-get 'hscroll winprops))
            (vscroll (image-mode-window-get 'vscroll winprops)))
-      (if hscroll (set-window-hscroll win hscroll))
-      (if vscroll (set-window-vscroll win vscroll)))))
+      (if hscroll (set-window-hscroll (selected-window) hscroll))
+      (if vscroll (set-window-vscroll (selected-window) vscroll)))))
 
 (defun image-mode-setup-winprops ()
   ;; Record current scroll settings.