.

original commit: 43b5d3542eba825a03f7e4d35da6651dec6b4110
2002-02-17 01:23:09 +00:00 · 2002-02-17 01:23:09 +00:00 · 64b2048dae
commit 64b2048dae
parent 911c5eb4ef
1 changed files with 1 additions and 1 deletions
--- a/collects/net/mime-unit.ss
+++ b/collects/net/mime-unit.ss
@ -646,7 +646,7 @@
                 (att (attribute (regexp-replace r par "\\1")))
                 (val (value (regexp-replace r par "\\2"))))
            (and (regexp-match r par)
-                 att val (cons att val)))))
+                 att val (cons (lowercase att) val)))))
      
      ;; value := token / quoted-string
      (define value