Build pdfinfo if needed.

Close #212.
seagle0128 · May 17, 2020 · aa9eb03 · aa9eb03
1 parent 2e5f930
commit aa9eb03
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 4 deletions.
diff --git a/lisp/init-reader.el b/lisp/init-reader.el
@@ -46,7 +46,8 @@
            ("C-s" . isearch-forward))
     :init (setq pdf-annot-activate-created-annotations t)
     :config
-    (pdf-tools-install t nil t nil)
+    ;; Build pdfinfo if needed
+    (advice-add #'pdf-view-decrypt-document :before #'pdf-tools-install)
 
     ;; Set dark theme
     (defun my-pdf-view-set-midnight-colors ()
@@ -156,9 +157,9 @@
               (when highlight-p
                 (pdf-view-display-image
                  (pdf-view-create-image
-                   (pdf-cache-renderpage-highlight
-                    page (car size)
-                    `("white" "steel blue" 0.35 ,@edges))
+                     (pdf-cache-renderpage-highlight
+                      page (car size)
+                      `("white" "steel blue" 0.35 ,@edges))
                    :map (pdf-view-apply-hotspot-functions
                          window page size)
                    :width (car size))))

diff --git a/lisp/init-ui.el b/lisp/init-ui.el
@@ -225,6 +225,7 @@
 (use-package hide-mode-line
   :hook (((completion-list-mode
            completion-in-region-mode
+           pdf-annot-list-mode
            flycheck-error-list-mode) . hide-mode-line-mode)))
 
 ;; A minor-mode menu for mode-line