# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1206629970 0
# Node ID cb3570d14a6621e82de99f9ab891c0bf312a9b92
# Parent  87f50b0c168f025b29bce4f0764776e6a56b90f8
(image-mode-reapply-winprops): Fix last change.

diff -r 87f50b0c168f -r cb3570d14a66 lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Mar 27 14:57:02 2008 +0000
+++ b/lisp/ChangeLog	Thu Mar 27 14:59:30 2008 +0000
@@ -1,3 +1,7 @@
+2008-03-27  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* image-mode.el (image-mode-reapply-winprops): Fix last change.
+
 2008-03-27  Kenichi Handa  <handa@ni.aist.go.jp>
 
 	* international/mule-conf.el (define-iso-single-byte-charset):
diff -r 87f50b0c168f -r cb3570d14a66 lisp/image-mode.el
--- a/lisp/image-mode.el	Thu Mar 27 14:57:02 2008 +0000
+++ b/lisp/image-mode.el	Thu Mar 27 14:59:30 2008 +0000
@@ -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.