tests: Downcase test names.

This is admittedly a nitpicky change, but it slightly improves
consistency.

* tests/email.scm ("parse obsolete Received header", "parse names with
more than two words", "assume application/octet-stream Content-Type if
Content-Transfer-Encoding is unrecognized", "parse Received header
with two tokens but no timestamp"): Downcase test names.

1 files changed, 5 insertions, 5 deletions

diff --git a/tests/email.scm b/tests/email.scm
index 481909a..50d1bea 100644
--- a/tests/email.scm
+++ b/tests/email.scm
@@ -1,6 +1,6 @@
 ;;; guile-email --- Guile email parser
 ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
-;;; Copyright © 2018, 2019, 2020, 2021 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2018, 2019, 2020, 2021, 2023 Arun Isaac <arunisaac@systemreboot.net>
 ;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au>
 ;;;
 ;;; This file was adapted from guile-debbugs and is part of guile-email.
@@ -501,7 +501,7 @@ copyright =A9")
                   (charset . "utf-8"))
     (content-transfer-encoding . 7bit)))
 
-(test-alist= "Parse obsolete Received header"
+(test-alist= "parse obsolete Received header"
   (parse-email-headers
    "Received: by foo.bar.com id ZZZ55555
 Received: from zzz ([1.2.3.5]) by ooo.ooo.com  with Maccrosoft SMTPSVC(5.5.1877.197.19)
@@ -513,7 +513,7 @@ Received: from zzz ([1.2.3.5]) by ooo.ooo.com  with Maccrosoft SMTPSVC(5.5.1877.
                   (charset . "utf-8"))
     (content-transfer-encoding . 7bit)))
 
-(test-alist= "Parse names with more than two words"
+(test-alist= "parse names with more than two words"
   (parse-email-headers
    "From: Foo Bar Foobar <foo@bar.org>
 ")
@@ -525,7 +525,7 @@ Received: from zzz ([1.2.3.5]) by ooo.ooo.com  with Maccrosoft SMTPSVC(5.5.1877.
     (content-transfer-encoding . 7bit)))
 
 ;; See §6.4 in RFC2045.
-(test-alist= "Assume application/octet-stream Content-Type if Content-Transfer-Encoding is unrecognized"
+(test-alist= "assume application/octet-stream Content-Type if Content-Transfer-Encoding is unrecognized"
   (parse-email-headers
    "Content-Transfer-Encoding: some-unrecognized-encoding
 Content-Type: text/plain; charset=utf-8
@@ -549,7 +549,7 @@ Content-Type: text/plain; charset=utf-8
     (content-transfer-encoding . 7bit)))
 
 ;; TODO: Fix this test once previous test is addressed.
-(test-alist= "Parse Received header with two tokens but no timestamp"
+(test-alist= "parse Received header with two tokens but no timestamp"
   (parse-email-headers
    "Received: from foo
 ")