diff options
-rw-r--r-- | pdf-view-reader.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/pdf-view-reader.el b/pdf-view-reader.el index f5b1265..6912c93 100644 --- a/pdf-view-reader.el +++ b/pdf-view-reader.el @@ -73,13 +73,13 @@ See `(elisp) Desktop Save Mode' for meanings of FILE, BUFFER and MISC." ;; Multi-page ;; TODO: Should use advice? - (defun pdf-view-pages-windows (&optional buffer) - (let ((b (or buffer (current-buffer)))) - (with-current-buffer b - (unless (derived-mode-p 'pdf-view-mode) - (error "Buffer is not a pdf-view buffer: %s" b)) - (seq-filter (lambda (x) (eq (window-buffer x) b)) - (window-list))))) +(defun pdf-view-pages-windows (&optional buffer) + (let ((b (or buffer (current-buffer)))) + (with-current-buffer b + (unless (derived-mode-p 'pdf-view-mode) + (error "Buffer is not a pdf-view buffer: %s" b)) + (seq-filter (lambda (x) (eq (window-buffer x) b)) + (window-list))))) (cl-macrolet ((m (dir page) `(defun ,(intern (format "pdf-view-pages-%s" dir)) (&optional n) |