Changes committed gnus/lisp (ChangeLog mm-view.el)

Modified: ChangeLog mm-view.el

(mm-pkcs7-signed-magic): Use literals.
(mm-pkcs7-enveloped-magic): Ditto.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1910 gnus/lisp/ChangeLog:7.1911
--- ChangeLog:7.1910	Wed Sep 17 13:06:34 2008
+++ ChangeLog	Mon Sep 22 06:47:37 2008
@@ -1,3 +1,8 @@
+2008-09-22  Daiki Ueno  <[email protected]>
+
+	* mm-view.el (mm-pkcs7-signed-magic): Use literals.
+	(mm-pkcs7-enveloped-magic): Ditto.
+
 2008-09-17  Simon Josefsson  <[email protected]>
 
 	* sieve-manage.el (sieve-manage-is-string): Accept literals too.
Index: mm-view.el
diff -u gnus/lisp/mm-view.el:7.57 gnus/lisp/mm-view.el:7.58
--- mm-view.el:7.57	Wed Jun 11 16:19:44 2008
+++ mm-view.el	Mon Sep 22 06:47:37 2008
@@ -599,20 +599,14 @@
 ;;      id-signedData OBJECT IDENTIFIER ::= { iso(1) member-body(2)
 ;;          us(840) rsadsi(113549) pkcs(1) pkcs7(7) 2 }
 (defvar mm-pkcs7-signed-magic
-  (funcall (if (fboundp 'unibyte-string) 'unibyte-string 'string)
-   ?\x30 ?\x5c ?\x28 ?\x80 ?\x5c ?\x7c ?\x81 ?\x2e ?\x5c
-   ?\x7c ?\x82 ?\x2e ?\x2e ?\x5c ?\x7c ?\x83 ?\x2e ?\x2e
-   ?\x2e ?\x5c ?\x29 ?\x06 ?\x09 ?\x5c ?\x2a ?\x86 ?\x48
-   ?\x86 ?\xf7 ?\x0d ?\x01 ?\x07 ?\x02))
+  "\x30\x5c\x28\x80\x5c\x7c\x81\x2e\x5c\x7c\x82\x2e\x2e\x5c\x7c\x83\x2e\x2e\
+\x2e\x5c\x29\x06\x09\x5c\x2a\x86\x48\x86\xf7\x0d\x01\x07\x02")
 
 ;;      id-envelopedData OBJECT IDENTIFIER ::= { iso(1) member-body(2)
 ;;          us(840) rsadsi(113549) pkcs(1) pkcs7(7) 3 }
 (defvar mm-pkcs7-enveloped-magic
-  (funcall (if (fboundp 'unibyte-string) 'unibyte-string 'string)
-   ?\x30 ?\x5c ?\x28 ?\x80 ?\x5c ?\x7c ?\x81 ?\x2e ?\x5c
-   ?\x7c ?\x82 ?\x2e ?\x2e ?\x5c ?\x7c ?\x83 ?\x2e ?\x2e
-   ?\x2e ?\x5c ?\x29 ?\x06 ?\x09 ?\x5c ?\x2a ?\x86 ?\x48
-   ?\x86 ?\xf7 ?\x0d ?\x01 ?\x07 ?\x03))
+  "\x30\x5c\x28\x80\x5c\x7c\x81\x2e\x5c\x7c\x82\x2e\x2e\x5c\x7c\x83\x2e\x2e\
+\x2e\x5c\x29\x06\x09\x5c\x2a\x86\x48\x86\xf7\x0d\x01\x07\x03"))
 
 (defun mm-view-pkcs7-get-type (handle)
   (mm-with-unibyte-buffer