From e7b8e2104adeaa7bc821abafcaa978f56583962d Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 13 Mar 2024 02:50:34 +0000
Subject: unused pdf-tools, {jao-,}docview good enough!

---
 attic/elisp/misc.el | 24 +++++++++++++++++++++++-
 1 file changed, 23 insertions(+), 1 deletion(-)

(limited to 'attic')

diff --git a/attic/elisp/misc.el b/attic/elisp/misc.el
index 06a46b9..4c398fe 100644
--- a/attic/elisp/misc.el
+++ b/attic/elisp/misc.el
@@ -813,12 +813,34 @@
   :diminish ((disable-mouse-global-mode . "")))
 
 (global-disable-mouse-mode)
-;;;; tmr
+;;; tmr
 (use-package tmr
   :ensure t
   :init
   (setq tmr-sound-file "/usr/share/sounds/freedesktop/stereo/message.oga"))
+;;; pdf-tools
+(use-package pdf-tools
+  :ensure t
+  :demand t
+  :init
+  (add-hook 'after-init-hook
+            (lambda ()
+              (setq pdf-view-midnight-colors
+                    (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 . ""))
 
+  :bind (:map pdf-view-mode-map
+              (("C-c C-d" . pdf-view-midnight-minor-mode)
+               ("j" . pdf-view-next-line-or-next-page)
+               ("J" . pdf-view-scroll-up-or-next-page)
+               ("k" . pdf-view-previous-line-or-previous-page)
+               ("K" . pdf-view-scroll-down-or-previous-page))))
 ;;; snippets
 (defun jao-org-notes-open-tags ()
   "Search for a note file, matching all tags with completion."
-- 
cgit v1.2.3