[pdf] Add pdf-mode keybindings to scroll through history

syl20bnr · Apr 21, 2020 · 1f6e39e · 1f6e39e
1 parent b227a68
commit 1f6e39e
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 1 deletion.
diff --git a/CHANGELOG.develop b/CHANGELOG.develop
@@ -2766,6 +2766,10 @@ Other:
 - Added declaration for the ~SPC P~ prefix (thanks to Codruț Constantin Gușoi)
 **** Pdf
 - Fixed ~'~ =pdf-view-jump-to-register= (thanks to duianto)
+-Key bindings:
+  - Added to pdf-view mode and transient state
+    - ~[~ history-backward (previous view)
+    - ~]~ history-forward (next view)
 **** Perl5
 - Fixed =spacemacs/perltidy-format-buffer= and
   =spacemacs/perltidy-format-function= to move the point and window to their

diff --git a/layers/+readers/pdf/README.org b/layers/+readers/pdf/README.org
@@ -121,6 +121,8 @@ If you use Emacs editing style, check the key bindings at the [[https://github.c
 | ~m~                  | Set mark                                  |
 | ~'~                  | Go to mark                                |
 | ~y~                  | Yank selected region                      |
+| ~[~                  | History back                              |
+| ~]~                  | History forward                           |
 |----------------------+-------------------------------------------|
 | *Search*             |                                           |
 |----------------------+-------------------------------------------|

diff --git a/layers/+readers/pdf/packages.el b/layers/+readers/pdf/packages.el
@@ -34,7 +34,7 @@
  [_d_/_u_] pg down/up          [_P_] fit to page              [_aD_] delete       [_p_] print
  [_J_/_K_] next/prev pg        [_m_] slice using mouse        [_am_] markup       [_o_] open link
  [_0_/_$_] full scroll l/r     [_b_] slice from bounding box  ^^                  [_r_] revert
- ^^^^                          [_R_] reset slice              ^^                  [_t_] attachments
+ [_[_/_]_] history back/for    [_R_] reset slice              ^^                  [_t_] attachments
  ^^^^                          [_zr_] reset zoom              ^^                  [_n_] night mode
  "
         :bindings
@@ -49,6 +49,8 @@
         ("d"  pdf-view-scroll-up-or-next-page)
         ("0"  image-bol)
         ("$"  image-eol)
+        ("["  pdf-history-backward)
+        ("]"  pdf-history-forward)
         ;; Scale/Fit
         ("W"  pdf-view-fit-width-to-window)
         ("H"  pdf-view-fit-height-to-window)
@@ -123,6 +125,8 @@
         (kbd "C-u") 'pdf-view-scroll-down-or-previous-page
         (kbd "C-d") 'pdf-view-scroll-up-or-next-page
         (kbd "``")  'pdf-history-backward
+        "["  'pdf-history-backward
+        "]"  'pdf-history-forward
         "'" 'pdf-view-jump-to-register
         ;; Search
         "/" 'isearch-forward