[gnus git] branch master updated: =1= mm: add support for inline javascript

       via  3272a40813e863cfac3bdab6a62795e93013ece1 (commit)
      from  06f30e4c4769fd79e968730fce1619f9092ecc50 (commit)


- Log -----------------------------------------------------------------
commit 3272a40813e863cfac3bdab6a62795e93013ece1
Author: Julien Danjou <[email protected]>
Date:   Tue Jan 25 20:08:44 2011 +0100

    mm: add support for inline javascript
    
    Signed-off-by: Julien Danjou <[email protected]>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index db850f1..ac487d3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2011-01-25  Julien Danjou  <[email protected]>
+
+	* mm-view.el (mm-display-shell-script-inline): Fix typo in docstring.
+	(mm-display-javascript-inline): New function.
+
+	* mm-decode.el (mm-inline-media-tests): Add application/javascript
+	viewing function.
+
 2011-01-25  Katsumi Yamaoka  <[email protected]>
 
 	* shr.el (shr-expand-newlines): Fix variable name.
diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el
index 019a0e8..d7bc882 100644
--- a/lisp/mm-decode.el
+++ b/lisp/mm-decode.el
@@ -239,6 +239,7 @@ before the external MIME handler is invoked."
     ("application/x-shellscript" mm-display-shell-script-inline identity)
     ("application/x-sh" mm-display-shell-script-inline identity)
     ("text/x-sh" mm-display-shell-script-inline identity)
+    ("application/javascript" mm-display-javascript-inline identity)
     ("text/dns" mm-display-dns-inline identity)
     ("text/x-org" mm-display-org-inline identity)
     ("text/html"
diff --git a/lisp/mm-view.el b/lisp/mm-view.el
index e3286b8..d63d202 100644
--- a/lisp/mm-view.el
+++ b/lisp/mm-view.el
@@ -636,9 +636,13 @@
   (mm-display-inline-fontify handle 'org-mode))
 
 (defun mm-display-shell-script-inline (handle)
-  "Show an shell script from HANDLE inline."
+  "Show a shell script from HANDLE inline."
   (mm-display-inline-fontify handle 'shell-script-mode))
 
+(defun mm-display-javascript-inline (handle)
+  "Show JavsScript code from HANDLE inline."
+  (mm-display-inline-fontify handle 'javascript-mode))
+
 ;;      id-signedData OBJECT IDENTIFIER ::= { iso(1) member-body(2)
 ;;          us(840) rsadsi(113549) pkcs(1) pkcs7(7) 2 }
 (defvar mm-pkcs7-signed-magic

-----------------------------------------------------------------------
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/mm-decode.el |    1 +
 lisp/mm-view.el   |    6 +++++-
 3 files changed, 14 insertions(+), 1 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