From e7b8e2104adeaa7bc821abafcaa978f56583962d Mon Sep 17 00:00:00 2001 From: jao Date: Wed, 13 Mar 2024 02:50:34 +0000 Subject: unused pdf-tools, {jao-,}docview good enough! --- attic/elisp/misc.el | 24 +++++++++++++++++++++++- init.el | 24 ------------------------ 2 files changed, 23 insertions(+), 25 deletions(-) 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." diff --git a/init.el b/init.el index 8a44e4d..27e2fb2 100644 --- a/init.el +++ b/init.el @@ -1528,30 +1528,6 @@ ("S" . jao-doc-session-save) ("u" . jao-doc-view-visit-url))) -;;;; 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)))) - ;;;; epub (use-package nov :ensure t -- cgit v1.2.3