diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-02-26 02:06:33 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-02-26 02:06:33 +0000 |
| commit | 160dfe4360364811a74431f21b43419f12b5ec7e (patch) | |
| tree | f31a4ac44d65c34b497f25e3276b9464ed7ed1e4 /lisp/doc-view.el | |
| parent | 060451300d0669fc4c56f6df789f8edc8f4305fa (diff) | |
| download | emacs-160dfe4360364811a74431f21b43419f12b5ec7e.tar.gz | |
(doc-view-current-page): Add a `win' argument.
Diffstat (limited to 'lisp/doc-view.el')
| -rw-r--r-- | lisp/doc-view.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/doc-view.el b/lisp/doc-view.el index 1923c4f2d4f..50338423218 100644 --- a/lisp/doc-view.el +++ b/lisp/doc-view.el @@ -318,7 +318,8 @@ the (uncompressed, extracted) file residing in ;;;; 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)) |