emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master fcdcdea 2/2: Fix whitespace regexp in gnus-base64-repad


From: Lars Ingebrigtsen
Subject: master fcdcdea 2/2: Fix whitespace regexp in gnus-base64-repad
Date: Tue, 29 Sep 2020 23:05:17 -0400 (EDT)

branch: master
commit fcdcdea324f32f63a25e4869e2e7c62293407421
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix whitespace regexp in gnus-base64-repad
    
    * lisp/gnus/gnus-util.el (gnus-base64-repad): Fix the whitespace
    regexp.
---
 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 e98af10..0e15ebc 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 "\\s-+" t)))
+  (let ((splitstr (split-string str "[\n\r \t]+" t)))
     (when (and reject-newlines (> (length splitstr) 1))
       (error "Invalid Base64 string"))
     (dolist (substr splitstr)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]