From e0849c498564b4d23df503a34c22fb237551bbc8 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 8 Oct 2019 20:56:01 +0530
Subject: Reindent calls to call-with-port.

* email/email.scm (body->mime-entities, email->headers+body): Reindent
calls to call-with-port.
* email/quoted-printable.scm (quoted-printable-encode,
q-encoding-encode): Reindent calls to call-with-port.
* tests/utils.scm ("read-bytes-till returns eof-object on end of
file"): Reindent call to call-with-port.
---
 tests/utils.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tests')

diff --git a/tests/utils.scm b/tests/utils.scm
index b787d9f..7681c72 100644
--- a/tests/utils.scm
+++ b/tests/utils.scm
@@ -28,7 +28,7 @@
 (test-assert "read-bytes-till returns eof-object on end of file"
   (eof-object?
    (call-with-port (open-bytevector-input-port (make-bytevector 0))
-                   (cut read-bytes-till <> (make-bytevector 1)))))
+     (cut read-bytes-till <> (make-bytevector 1)))))
 
 (test-assert "read-while returns eof-object on end of file"
   (eof-object?
-- 
cgit v1.2.3