diff options
author | jao <jao@gnu.org> | 2022-08-30 12:00:04 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-08-30 12:00:04 +0100 |
commit | 7df1e0400ee5496535ff709caee54fb750af2c04 (patch) | |
tree | 2f4da48ebceac2201f77b58afc02fccede3f912d /lib/doc/jao-pdf.el | |
parent | cccf4658ed4e9f900477698fb19af37634093059 (diff) | |
download | elibs-7df1e0400ee5496535ff709caee54fb750af2c04.tar.gz elibs-7df1e0400ee5496535ff709caee54fb750af2c04.tar.bz2 |
jao-pdf &co.
Diffstat (limited to 'lib/doc/jao-pdf.el')
-rw-r--r-- | lib/doc/jao-pdf.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/doc/jao-pdf.el b/lib/doc/jao-pdf.el index 6158306..6274cbb 100644 --- a/lib/doc/jao-pdf.el +++ b/lib/doc/jao-pdf.el @@ -73,7 +73,9 @@ The result is cached as a local buffer variable." (defun jao-pdf-section-title (&optional page file-name) (when (not jao-pdf--outline) (setq-local jao-pdf--outline (jao-pdf-outline file-name))) - (let ((page (or page (jao-pdf-current-page))) + (let ((page (or page + (and (derived-mode-p 'doc-view-mode) (doc-view-current-page)) + (and (derived-mode-p 'pdf-view) (pdf-view-current-page)))) (outline jao-pdf--outline) (cur-page 0) (cur-title (jao-pdf-title (or file-name buffer-file-name "title")))) |