summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorArun Isaac2019-10-08 20:56:01 +0530
committerArun Isaac2019-10-08 20:56:01 +0530
commite0849c498564b4d23df503a34c22fb237551bbc8 (patch)
tree6acde2d0ee6dee92968027d6c8501edb9bf7c600 /tests
parent5058ce6ea76bc1104a5950a50d50b06969296215 (diff)
downloadguile-email-e0849c498564b4d23df503a34c22fb237551bbc8.tar.gz
guile-email-e0849c498564b4d23df503a34c22fb237551bbc8.tar.lz
guile-email-e0849c498564b4d23df503a34c22fb237551bbc8.zip
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.
Diffstat (limited to 'tests')
-rw-r--r--tests/utils.scm2
1 files changed, 1 insertions, 1 deletions
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?