# HG changeset patch
# User Tassilo Horn <tassilo@member.fsf.org>
# Date 1201629667 0
# Node ID 656f1559e08846dff799c9d1f230d61ca292e560
# Parent  4ff20f6b1ec84aafd26ec23e1a931983b0151d60
	* doc-view.el (doc-view-mode): Adapt to i-m-current-[vh]scroll
	being an alist now.

diff -r 4ff20f6b1ec8 -r 656f1559e088 lisp/doc-view.el
--- a/lisp/doc-view.el	Tue Jan 29 18:00:40 2008 +0000
+++ b/lisp/doc-view.el	Tue Jan 29 18:01:07 2008 +0000
@@ -989,10 +989,10 @@
 	    nil t)
 
   ;; Keep track of [vh]scroll when switching buffers
-  (set (make-local-variable 'image-mode-current-hscroll)
-       (window-hscroll (selected-window)))
-  (set (make-local-variable 'image-mode-current-vscroll)
-       (window-vscroll (selected-window)))
+  (make-local-variable 'image-mode-current-hscroll)
+  (make-local-variable 'image-mode-current-vscroll)
+  (image-set-window-hscroll (selected-window) (window-hscroll))
+  (image-set-window-vscroll (selected-window) (window-vscroll))
   (add-hook 'window-configuration-change-hook
 	    'image-reset-current-vhscroll nil t)