c1484c9f85
Change-Id: I448b9241726c3bb08f14188775a66e1da1225e02 Reviewed-on: https://cl.tvl.fyi/c/depot/+/5004 Tested-by: BuildkiteCI Autosubmit: sterni <sternenseemann@systemli.org> Reviewed-by: sterni <sternenseemann@systemli.org>
13 lines
819 B
Diff
13 lines
819 B
Diff
diff --git a/qbase64-test.lisp b/qbase64-test.lisp
|
|
index 310fdf3..b92abb5 100644
|
|
--- a/qbase64-test.lisp
|
|
+++ b/qbase64-test.lisp
|
|
@@ -14,7 +14,7 @@
|
|
(with-open-temporary-file (tmp :direction :output :element-type '(unsigned-byte 8))
|
|
(write-sequence bytes tmp)
|
|
(force-output tmp)
|
|
- (let* ((encoded (uiop:run-program `("base64" "-b" ,(format nil "~A" linebreak) "-i" ,(namestring tmp)) :output (if (zerop linebreak) '(:string :stripped t) :string)))
|
|
+ (let* ((encoded (uiop:run-program `("base64" "-w" ,(format nil "~A" linebreak) ,(namestring tmp)) :output (if (zerop linebreak) '(:string :stripped t) :string) :error-output *error-output*))
|
|
(length (length encoded)))
|
|
(cond ((and (> length 1)
|
|
(string= (subseq encoded (- length 2))
|