[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master da40e5e: Fix space parsing in gnus-base64-repad
From: |
Lars Ingebrigtsen |
Subject: |
master da40e5e: Fix space parsing in gnus-base64-repad |
Date: |
Tue, 29 Sep 2020 09:37:04 -0400 (EDT) |
branch: master
commit da40e5ecd79f8ad14915dae477c40f4090ce22ac
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix space parsing in gnus-base64-repad
* lisp/gnus/gnus-util.el (gnus-base64-repad): Get the separator
regexp right -- there will often be spaces around the newlines.
---
lisp/gnus/gnus-util.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el
index f812690..e98af10 100644
--- a/lisp/gnus/gnus-util.el
+++ b/lisp/gnus/gnus-util.el
@@ -1368,7 +1368,7 @@ CRLF (RFC 5321 SMTP)."
;; input (3.1, 3.3)
;; - if line-length is set, error on input exceeding the limit (3.1)
;; - reject characters outside base encoding (3.3, also section 12)
- (let ((splitstr (split-string str "[\r\n]" t)))
+ (let ((splitstr (split-string str "\\s-+" t)))
(when (and reject-newlines (> (length splitstr) 1))
(error "Invalid Base64 string"))
(dolist (substr splitstr)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master da40e5e: Fix space parsing in gnus-base64-repad,
Lars Ingebrigtsen <=