Changeset 15784 in project


Ignore:
Timestamp:
09/08/09 03:13:56 (10 years ago)
Author:
iraikov
Message:

some renaming in smtp

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/smtp/trunk/smtp.scm

    r15721 r15784  
    670670                       
    671671
    672 (define p-smtp-cmd
     672(define smtp-cmd
    673673  (abnf:longest
    674674   (abnf:alternatives
     
    679679(define (parse-cmd cont)
    680680  (let ((cont1 (lambda (s) (cont (map caar s)))))
    681     (lambda (s) (p-smtp-cmd cont1 s))))
     681    (lambda (s) (smtp-cmd cont1 s))))
    682682
    683683
Note: See TracChangeset for help on using the changeset viewer.