[gnus git] branch master updated: =2= Enhance inline viewing ; Add shellscript fontification

       via  50294aaf8e300e030f40137b21eb290123f2e2da (commit)
       via  6242139e39fe923bf469377ed1d64487c900d0eb (commit)
      from  2d2f709ab067c5688f325fc64c618988ed6fd178 (commit)


- Log -----------------------------------------------------------------
commit 50294aaf8e300e030f40137b21eb290123f2e2da
Author: Julien Danjou <[email protected]>
Date:   Thu Jan 20 15:45:32 2011 +0100

    Enhance inline viewing
    
    Signed-off-by: Julien Danjou <[email protected]>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7c4ebc1..c252b97 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2011-01-20  Julien Danjou  <[email protected]>
 
+	* gnus-art.el (gnus-mime-inline-part): Use mm-display-inline rather
+	than mm-insert-inline to insert inline part: this respect
+	mm-inline-media-tests displayers.
+
 	* mm-view.el (mm-display-shell-script-inline): New function.
 
 	* mm-decode.el (mm-inline-media-tests): Add x-shellscript and x-sh.
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 8e8fa9b..280914d 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -5249,15 +5249,7 @@ Compressed files like .gz and .bz2 are decompressed."
 	  (if (mm-handle-undisplayer handle)
 	      (mm-remove-part handle))))
 	(forward-line 2)
-	(mm-insert-inline
-	 handle
-	 (if (or coding-system
-		 (and charset
-		      (setq coding-system
-			    (mm-charset-to-coding-system charset))
-		      (not (eq coding-system 'ascii))))
-	     (mm-decode-coding-string contents coding-system)
-	   (mm-string-to-multibyte contents)))
+        (mm-display-inline handle)
 	(goto-char b)))))
 
 (defun gnus-mime-set-charset-parameters (handle charset)

commit 6242139e39fe923bf469377ed1d64487c900d0eb
Author: Julien Danjou <[email protected]>
Date:   Thu Jan 20 15:44:22 2011 +0100

    Add shellscript fontification
    
    Signed-off-by: Julien Danjou <[email protected]>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08c158a..7c4ebc1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2011-01-20  Julien Danjou  <[email protected]>
 
+	* mm-view.el (mm-display-shell-script-inline): New function.
+
+	* mm-decode.el (mm-inline-media-tests): Add x-shellscript and x-sh.
+
 	* mm-uu.el (mm-uu-type-alist): Add org block.
 	(mm-uu-org-src-code-block-extract): New function.
 
diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el
index bbe7150..3b592aa 100644
--- a/lisp/mm-decode.el
+++ b/lisp/mm-decode.el
@@ -237,6 +237,8 @@ before the external MIME handler is invoked."
      (lambda (handle) (fboundp 'diff-mode)))
     ("application/emacs-lisp" mm-display-elisp-inline identity)
     ("application/x-emacs-lisp" mm-display-elisp-inline identity)
+    ("application/x-shellscript" mm-display-shell-script-inline identity)
+    ("application/x-sh" mm-display-shell-script-inline identity)
     ("text/dns" mm-display-dns-inline identity)
     ("text/org" mm-display-org-inline identity)
     ("text/html"
diff --git a/lisp/mm-view.el b/lisp/mm-view.el
index c1e270b..fa8c94c 100644
--- a/lisp/mm-view.el
+++ b/lisp/mm-view.el
@@ -636,6 +636,9 @@
   "Show an Org mode text from HANDLE inline."
   (mm-display-inline-fontify handle 'org-mode))
 
+(defun mm-display-shell-script-inline (handle)
+  "Show an shell script from HANDLE inline."
+  (mm-display-inline-fontify handle 'shell-script-mode))
 
 ;;      id-signedData OBJECT IDENTIFIER ::= { iso(1) member-body(2)
 ;;          us(840) rsadsi(113549) pkcs(1) pkcs7(7) 2 }

-----------------------------------------------------------------------
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    |    8 ++++++++
 lisp/gnus-art.el  |   10 +---------
 lisp/mm-decode.el |    2 ++
 lisp/mm-view.el   |    3 +++
 4 files changed, 14 insertions(+), 9 deletions(-)

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