[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r112907: lisp/gnus/mm-view.el (mm-pkcs7-signed-magic
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] trunk r112907: lisp/gnus/mm-view.el (mm-pkcs7-signed-magic, mm-pkcs7-enveloped-magic): Correct PKCS7 regexps to match messages with 0x0a bytes |
Date: |
Mon, 10 Jun 2013 05:17:54 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 112907
revision-id: address@hidden
parent: address@hidden
author: Roy Hashimoto <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2013-06-10 05:17:51 +0000
message:
lisp/gnus/mm-view.el (mm-pkcs7-signed-magic, mm-pkcs7-enveloped-magic):
Correct PKCS7 regexps to match messages with 0x0a bytes
=== modified file 'doc/misc/epa.texi'
--- a/doc/misc/epa.texi 2013-06-10 00:32:49 +0000
+++ b/doc/misc/epa.texi 2013-06-10 05:17:51 +0000
@@ -240,9 +240,8 @@
@node Cryptographic operations on files
@section Cryptographic operations on files
address@hidden Command epa-decrypt-file file &optional output
-Decrypt @var{file}. If you do not specify the name @var{output} to
-use for the decrypted file, this function prompts for the value to use.
address@hidden Command epa-decrypt-file file
+Decrypt @var{file}.
@end deffn
@deffn Command epa-verify-file file
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2013-06-06 22:18:53 +0000
+++ b/lisp/gnus/ChangeLog 2013-06-10 05:17:51 +0000
@@ -1,3 +1,9 @@
+2013-06-10 Roy Hashimoto <address@hidden> (tiny change)
+
+ * mm-view.el (mm-pkcs7-signed-magic): Allow newline in the regexp and
+ make it easier to read.
+ (mm-pkcs7-enveloped-magic): Ditto.
+
2013-06-06 Teodor Zlatanov <address@hidden>
* gnus-ems.el (gnus-image-type-available-p): Test `display-images-p'
=== modified file 'lisp/gnus/mm-view.el'
--- a/lisp/gnus/mm-view.el 2013-01-01 09:11:05 +0000
+++ b/lisp/gnus/mm-view.el 2013-06-10 05:17:51 +0000
@@ -660,14 +660,26 @@
;; id-signedData OBJECT IDENTIFIER ::= { iso(1) member-body(2)
;; us(840) rsadsi(113549) pkcs(1) pkcs7(7) 2 }
(defvar mm-pkcs7-signed-magic
- "\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")
+ (concat
+ "0"
+ "\\(\\(\x80\\)"
+ "\\|\\(\x81\\(.\\|\n\\)\\{1\\}\\)"
+ "\\|\\(\x82\\(.\\|\n\\)\\{2\\}\\)"
+ "\\|\\(\x83\\(.\\|\n\\)\\{3\\}\\)"
+ "\\)"
+ "\x06\x09\\*\x86H\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
- "\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")
+ (concat
+ "0"
+ "\\(\\(\x80\\)"
+ "\\|\\(\x81\\(.\\|\n\\)\\{1\\}\\)"
+ "\\|\\(\x82\\(.\\|\n\\)\\{2\\}\\)"
+ "\\|\\(\x83\\(.\\|\n\\)\\{3\\}\\)"
+ "\\)"
+ "\x06\x09\\*\x86H\x86\xf7\x0d\x01\x07\x03"))
(defun mm-view-pkcs7-get-type (handle)
(mm-with-unibyte-buffer
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r112907: lisp/gnus/mm-view.el (mm-pkcs7-signed-magic, mm-pkcs7-enveloped-magic): Correct PKCS7 regexps to match messages with 0x0a bytes,
Katsumi Yamaoka <=