diff options
| author | Arun Isaac | 2019-09-28 11:20:41 +0530 |
|---|---|---|
| committer | Arun Isaac | 2019-09-28 11:20:41 +0530 |
| commit | f37b33d163016a6deec5c23bc860447a2eaefcb9 (patch) | |
| tree | c988560fc031e8328130e889aaf3dc85214a3c53 /email | |
| parent | 5e88d4515de5aae0965b52e8806aa160e4b5d261 (diff) | |
| download | guile-email-f37b33d163016a6deec5c23bc860447a2eaefcb9.tar.gz guile-email-f37b33d163016a6deec5c23bc860447a2eaefcb9.tar.lz guile-email-f37b33d163016a6deec5c23bc860447a2eaefcb9.zip | |
email: Remove duplicate unbracketed-angle-addr definition.
* email/email.scm (unbracketed-angle-addr): Delete duplicate
definition.
Diffstat (limited to 'email')
| -rw-r--r-- | email/email.scm | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/email/email.scm b/email/email.scm index 850c783..ef2efe9 100644 --- a/email/email.scm +++ b/email/email.scm @@ -285,11 +285,6 @@ (define-angle-addr-pattern unbracketed-angle-addr (ignore "<") (ignore ">")) -(define-peg-pattern unbracketed-angle-addr body - (and (ignore (? cfws)) - (ignore "<") addr-spec (ignore ">") - (ignore (? cfws)))) - (define-peg-pattern name-addr body (and (? display-name) unbracketed-angle-addr)) |