Changeset 15071 in project


Ignore:
Timestamp:
06/26/09 04:44:08 (11 years ago)
Author:
Ivan Raikov
Message:

day parser in internet-message now uses abnf:variable-substition

Location:
release/4/internet-message/trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • release/4/internet-message/trunk/internet-message.scm

    r14973 r15071  
    371371             (abnf:drop-consumed (abnf:optional-sequence fws))
    372372             (abnf:alternatives
    373               (consumed->string (abnf:repetition-n 2 abnf:decimal))
     373              (consumed->string (abnf:variable-repetition 1 2 abnf:decimal))
    374374              (abnf:drop-consumed fws))))
    375375
     
    419419;; a dot-atom or a quoted-string.
    420420
    421 (define local-part (abnf:alternatives
    422                     dot-atom quoted-string))
     421(define local-part (abnf:alternatives dot-atom quoted-string))
    423422
    424423
  • release/4/internet-message/trunk/internet-message.setup

    r14963 r15071  
    1717
    1818  ;; Assoc list with properties for your extension:
    19   '((version 1.0)
     19  '((version 1.1)
    2020    (documentation "internet-message.html")
    2121    ))
  • release/4/internet-message/trunk/tests/run.scm

    r14968 r15071  
    3939    ;; date
    4040    ("Date: Fri, 29 Aug 2008 12:21:46 +0200\r\n" ((Date (day-of-week "Fri") (date "29" "Aug" "2008")
     41                                                        (time "12" "21" "46" "+" "02" "00"))))
     42    ("Date: Fri,  2 Aug 2008 12:21:46 +0200\r\n" ((Date (day-of-week "Fri") (date "2" "Aug" "2008")
    4143                                                        (time "12" "21" "46" "+" "02" "00"))))
    4244   
Note: See TracChangeset for help on using the changeset viewer.