pdf: Add binds for `pdf-history-forward/backward`
... and remove duplicate `(defvars ...)`
This commit is contained in:
parent
76d003c0f0
commit
6306aa78a9
|
@ -30,8 +30,10 @@
|
|||
(require 'evil-collection)
|
||||
(require 'pdf-tools nil t)
|
||||
(require 'pdf-view nil t)
|
||||
(require 'pdf-history nil t)
|
||||
|
||||
(defconst evil-collection-pdf-maps '(pdf-view-mode-map
|
||||
pdf-history-minor-mode-map
|
||||
pdf-outline-buffer-mode-map
|
||||
pdf-occur-buffer-mode-map))
|
||||
|
||||
|
@ -40,12 +42,11 @@
|
|||
(declare-function pdf-view-goto-page "pdf-view")
|
||||
(declare-function pdf-view-previous-line-or-previous-page "pdf-view")
|
||||
(declare-function pdf-view-next-line-or-next-page "pdf-view")
|
||||
(declare-function pdf-history-forward "pdf-history")
|
||||
(declare-function pdf-history-backward "pdf-history")
|
||||
|
||||
(defvar pdf-view-mode-map)
|
||||
(defvar pdf-outline-buffer-mode-map)
|
||||
(defvar pdf-occur-buffer-mode-map)
|
||||
|
||||
(defvar pdf-view-mode-map)
|
||||
(defvar pdf-history-minor-mode-map)
|
||||
(defvar pdf-outline-buffer-mode-map)
|
||||
(defvar pdf-occur-buffer-mode-map)
|
||||
|
||||
|
@ -95,6 +96,20 @@ Consider COUNT."
|
|||
(image-bob)
|
||||
(image-set-window-hscroll hscroll))))
|
||||
|
||||
(defun evil-collection-pdf-jump-forward (&optional count)
|
||||
"Wrap `pdf-history-forward' with `evil'.
|
||||
|
||||
Consider COUNT."
|
||||
(interactive "P")
|
||||
(pdf-history-forward (or count 1)))
|
||||
|
||||
(defun evil-collection-pdf-jump-backward (&optional count)
|
||||
"Wrap `pdf-history-backward' with `evil'.
|
||||
|
||||
Consider COUNT."
|
||||
(interactive "P")
|
||||
(pdf-history-backward (or count 1)))
|
||||
|
||||
;;;###autoload
|
||||
(defun evil-collection-pdf-setup ()
|
||||
"Set up `evil' bindings for `pdf-view'."
|
||||
|
@ -195,6 +210,13 @@ Consider COUNT."
|
|||
(evil-collection-define-key 'visual 'pdf-view-mode-map
|
||||
"y" 'pdf-view-kill-ring-save)
|
||||
|
||||
(evil-collection-inhibit-insert-state 'pdf-history-minor-mode-map)
|
||||
(evil-set-initial-state 'pdf-history-minor-mode 'normal)
|
||||
(evil-collection-define-key 'normal 'pdf-history-minor-mode-map
|
||||
;; history forward / backward
|
||||
(kbd "C-i") 'evil-collection-pdf-jump-forward
|
||||
(kbd "C-o") 'evil-collection-pdf-jump-backward)
|
||||
|
||||
(evil-collection-inhibit-insert-state 'pdf-outline-buffer-mode-map)
|
||||
(evil-set-initial-state 'pdf-outline-buffer-mode 'normal)
|
||||
(evil-collection-define-key 'normal 'pdf-outline-buffer-mode-map
|
||||
|
|
Loading…
Reference in New Issue