Support PDF Tools for PDF viewing of attachments

* mailcap.el (mailcap-mime-data): Support `pdf-view-mode' (from PDF
Tools: https://github.com/politza/pdf-tools) for viewing PDF
attachments in emacs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b6a24f1..1a0a736 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2015-02-23  Tassilo Horn  <tsdh@gnu.org>
+
+       * mailcap.el (mailcap-mime-data): Support `pdf-view-mode' (from PDF
+       Tools: https://github.com/politza/pdf-tools) for viewing PDF
+       attachments in emacs.
+
 2015-02-23  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (gnus-mime-display-single): Avoid "End of buffer" error.

diff --git a/lisp/mailcap.el b/lisp/mailcap.el
index 01d8587..9f84413 100644 (file)
--- a/lisp/mailcap.el
+++ b/lisp/mailcap.el
@@ -152,6 +152,11 @@ This is a compatibility function for different Emacsen."
       (non-viewer . t)
       (type   . "application/zip")
       ("copiousoutput"))
+     ("pdf"
+      (viewer . pdf-view-mode)
+      (type . "application/pdf")
+      (test . (and (fboundp 'pdf-view-mode)
+                  (eq window-system 'x))))
      ("pdf"
       (viewer . doc-view-mode)
       (type . "application/pdf")