diff options
Diffstat (limited to 'email')
| -rw-r--r-- | email/email.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/email/email.scm b/email/email.scm index 631d519..3f4e194 100644 --- a/email/email.scm +++ b/email/email.scm @@ -1,5 +1,5 @@ ;;; guile-email --- Guile email parser -;;; Copyright © 2018, 2019, 2020 Arun Isaac <arunisaac@systemreboot.net> +;;; Copyright © 2018, 2019, 2020, 2021 Arun Isaac <arunisaac@systemreboot.net> ;;; ;;; This file is part of guile-email. ;;; @@ -224,7 +224,7 @@ (define-word-pattern cfws-captured-word cfws-captured-atom) (define-peg-pattern obs-phrase body - (and cfws-captured-word (* (or "." cfws word)))) + (and cfws-captured-word (* (or cfws-captured-word "." cfws)))) ;; We set phrase to be the same as obs-phrase since, according to ;; their definitions in RFC5322, all phrases are obs-phrases. |