[Emacs-diffs] Changes to emacs/lisp/doc-view.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/02/26 02:06:35

Index: doc-view.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/doc-view.el,v
retrieving revision 1.47
retrieving revision 1.48
diff -u -b -r1.47 -r1.48
--- doc-view.el 25 Feb 2008 20:04:58 -0000      1.47
+++ doc-view.el 26 Feb 2008 02:06:32 -0000      1.48
@@ -318,7 +318,8 @@
 
 ;;;; Navigation Commands
 
-(defmacro doc-view-current-page () `(image-mode-window-get 'page))
+(defmacro doc-view-current-page (&optional win)
+  `(image-mode-window-get 'page ,win))
 (defmacro doc-view-current-info () `(image-mode-window-get 'info))
 (defmacro doc-view-current-overlay () `(image-mode-window-get 'overlay))
 (defmacro doc-view-current-image () `(image-mode-window-get 'image))