From 460d921de8788a7ae8dfaebcf5aec0d776d3cbd5 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sat, 13 Aug 2022 19:44:05 +0100
Subject: jao-doc-session: using it

---
 init.el | 19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 1ebd2f3..63968a3 100644
--- a/init.el
+++ b/init.el
@@ -1688,18 +1688,21 @@
         doc-view-resolution 110
         doc-view-continuous t
         doc-view-conversion-refresh-interval 1)
-
+  :hook ((doc-view-mode . jao-doc-session-mark))
   :bind (:map doc-view-mode-map
               ("j" . doc-view-next-line-or-next-page)
               ("J" . doc-view-scroll-up-or-next-page)
               ("k" . doc-view-previous-line-or-previous-page)
               ("K" . doc-view-scroll-down-or-previous-page)))
 
+(use-package jao-doc-session :demand t)
+
 (use-package jao-doc-view
+  :demand t
   :bind (:map doc-view-mode-map
               ("b" . jao-doc-view-back)
               ("B" . jao-doc-view-forward)
-              ("S" . jao-doc-view-save-session)
+              ("S" . jao-doc-session-save)
               ("u" . jao-doc-view-visit-url)))
 
 ;;;; pdf-tools
@@ -1714,6 +1717,8 @@
                     (cons (frame-parameter nil 'foreground-color)
                           (frame-parameter nil 'background-color)))))
 
+  :hook ((pdf-view-mode . jao-doc-session-mark))
+
   :config (pdf-tools-install)
 
   :diminish ((pdf-view-midnight-minor-mode . ""))
@@ -1818,7 +1823,11 @@
   :after doc-view
   :init (setq nov-variable-pitch t
               nov-text-width nil)
-  :config (add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode)))
+  :config
+  (add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode))
+  (defun jao-nov-register-session ()
+    (jao-doc-session-mark nov-file-name))
+  (add-hook 'nov-mode-hook #'jao-nov-register-session))
 
 ;;;; transient
 (defun jao-org-pdf-goto-org-linking ()
@@ -1838,7 +1847,7 @@
    ("cm" "using mouse" doc-view-set-slice-using-mouse)]
   ["Session"
    ("s" "load session" jao-afio-open-pdf-session)
-   ("S" "save session" jao-doc-view-save-session)
+   ("S" "save session" jao-doc-session-save)
    ("d" "visit cache directory" doc-view-dired-cache)])
 
 (with-eval-after-load "pdf-view"
@@ -1851,7 +1860,7 @@
      ("f" "forward jump" pdf-history-forward)]
     ["Session"
      ("s" "load session" jao-afio-open-pdf-session)
-     ("S" "save session" jao-doc-view-save-session)]))
+     ("S" "save session" jao-doc-session-save)]))
 
 ;; (transient-get-suffix 'jao-transient-pdf-view '(0 -1))
 
-- 
cgit v1.2.3