[gnus git] branch master updated: m0-11-91-gf8b3175 =2= mailcap.el: Make it easier to use mailcap for viewing single files ; gnus-art.el (article-hide-list-identifiers): Fix a typo in doc string

Katsumi <[email protected]> Sat, 06 Dec 2014 02:41:29 +0100
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  f8b31759c961a813b9e3c9785cabb245c9e7ec7a (commit)
       via  24a7466fde8aa890bebfe59e1f6187c36d7af6d2 (commit)
      from  2bf2365af7e8015e3b3206b3610e17c5e8654018 (commit)


- Log -----------------------------------------------------------------
commit f8b31759c961a813b9e3c9785cabb245c9e7ec7a
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sat Dec 6 01:41:19 2014 +0000

    mailcap.el: Make it easier to use mailcap for viewing single files

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7d4bb9e..cc76e4b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2014-12-05  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* mailcap.el (mailcap-mime-data): Add doc-view-mode as a viewer for
+	PDFs.
+	(mailcap-view-mime): New function.
+
 2014-12-01  Glenn Morris  <[email protected]>
 
 	* gnus-cloud.el (gnus-cloud): Add :version tag.
diff --git a/lisp/mailcap.el b/lisp/mailcap.el
index 4f1bdf4..1a1a992 100644
--- a/lisp/mailcap.el
+++ b/lisp/mailcap.el
@@ -153,6 +153,10 @@ This is a compatibility function for different Emacsen."
       (type   . "application/zip")
       ("copiousoutput"))
      ("pdf"
+      (viewer . doc-view-mode)
+      (type . "application/pdf")
+      (test . (eq window-system 'x)))
+     ("pdf"
       (viewer . "gv -safer %s")
       (type . "application/pdf")
       (test . window-system)
@@ -1060,6 +1064,18 @@ If FORCE, re-parse even if already parsed."
 			     common-mime-info)))))
     commands))
 
+(defun mailcap-view-mime (type)
+  "View the data in the current buffer that has MIME type TYPE.
+`mailcap-mime-data' determines the method to use."
+  (let ((method (mailcap-mime-info type)))
+    (if (stringp method)
+	(shell-command-on-region (point-min) (point-max)
+				 ;; Use stdin as the "%s".
+				 (format method "-")
+				 (current-buffer)
+				 t)
+      (funcall method))))
+
 (provide 'mailcap)
 
 ;;; mailcap.el ends here

commit 24a7466fde8aa890bebfe59e1f6187c36d7af6d2
Author: Sam Steingold <[email protected]>
Date:   Sat Dec 6 01:39:04 2014 +0000

    gnus-art.el (article-hide-list-identifiers): Fix a typo in doc string

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index d759583..bfc8c63 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3083,7 +3083,7 @@ images if any to the browser, and deletes them when exiting the group
 	(gnus-summary-show-article)))))
 
 (defun article-hide-list-identifiers ()
-  "Remove list identifies from the Subject header.
+  "Remove list identifiers from the Subject header.
 The `gnus-list-identifiers' variable specifies what to do."
   (interactive)
   (let ((inhibit-point-motion-hooks t)

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog   |    6 ++++++
 lisp/gnus-art.el |    2 +-
 lisp/mailcap.el  |   16 ++++++++++++++++
 3 files changed, 23 insertions(+), 1 deletion(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project