emacs-diffs
[Top][All Lists]
Advanced

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

master 1993c4e 1/2: Fix gnus-base64-repad test failures


From: Lars Ingebrigtsen
Subject: master 1993c4e 1/2: Fix gnus-base64-repad test failures
Date: Tue, 29 Sep 2020 23:05:17 -0400 (EDT)

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

    Fix gnus-base64-repad test failures
---
 test/lisp/gnus/gnus-util-tests.el | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/test/lisp/gnus/gnus-util-tests.el 
b/test/lisp/gnus/gnus-util-tests.el
index ed33be4..ec58032 100644
--- a/test/lisp/gnus/gnus-util-tests.el
+++ b/test/lisp/gnus/gnus-util-tests.el
@@ -151,10 +151,8 @@
   (should (equal "Zg==" (gnus-base64-repad "Zg")))
   (should (equal "Zg==" (gnus-base64-repad "Zg====")))
 
-  (should-error (gnus-base64-repad " ")
-                :type 'error)
-  (should-error (gnus-base64-repad "Zg== ")
-                :type 'error)
+  (should (equal (gnus-base64-repad " ") ""))
+  (should (equal (gnus-base64-repad "Zg== ") "Zg=="))
   (should-error (gnus-base64-repad "Z?\x00g==")
                 :type 'error)
   ;; line-length
@@ -166,8 +164,7 @@
   (should (equal "Zm9vYmFy" (gnus-base64-repad "Zm9vYmFy" t)))
   (should (equal "Zm9vYmFy" (gnus-base64-repad "Zm9v\r\nYmFy" nil)))
   (should (equal "Zm9vYmFy" (gnus-base64-repad "Zm9v\r\nYmFy\n" nil)))
-  (should-error (gnus-base64-repad "Zm9v\r\n YmFy\r\n" nil)
-                :type 'error)
+  (should (equal (gnus-base64-repad "Zm9v\r\n YmFy\r\n" nil) "Zm9vYmFy"))
   (should-error (gnus-base64-repad "Zm9v\r\nYmFy" nil 3)
                 :type 'error))
 



reply via email to

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