tools/pdf: suppress "file is large" prompts for pdfs

mlloreda · Apr 15, 2021 · 437f122 · 437f122
1 parent b158215
commit 437f122
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/modules/tools/pdf/config.el b/modules/tools/pdf/config.el
@@ -137,7 +137,13 @@
                (apply create-image file-or-data type data-p
                       :width (car (pdf-view-image-size))
                       props))
-        (apply orig-fn args)))))
+        (apply orig-fn args))))
+
+  ;; Silence "File *.pdf is large (X MiB), really open?" prompts for pdfs
+  (defadvice! +pdf-suppress-large-file-prompts-a (orig-fn size op-type filename &optional offer-raw)
+    :around #'abort-if-file-too-large
+    (unless (string-match-p "\\.pdf\\'" filename)
+      (funcall orig-fn size op-type filename offer-raw))))
 
 
 (use-package! saveplace-pdf-view