Changeset 21102 in project


Ignore:
Timestamp:
10/27/10 18:05:09 (10 years ago)
Author:
Moritz Heidkamp
Message:

vandusen: add colon or comma separator to tell command and add irc:whisper

Location:
release/4/vandusen/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/vandusen/trunk/irc-helpers.scm

    r18259 r21102  
    1010                 (car (irc:message-parameters message))))
    1111
     12(define (irc:whisper connection nick message #!optional (method irc:say))
     13  (method connection message nick))
     14
    1215(define (irc:reply connection message text #!optional (method irc:say) (prefixed #t))
    1316  (receive (recipient prefix)
  • release/4/vandusen/trunk/vandusen-pager.scm

    r21101 r21102  
    1414
    1515          (command 'tell
    16                    '(: "tell" (+ space) (submatch (+ (~ space))) (? ",") (* space) (submatch (+ any)))
     16                   '(: "tell" (+ space) (submatch (+ (~ (or space #\, #\:)))) (or #\, #\:) (* space) (submatch (+ any)))
    1717                   (lambda (master nick msg)
    1818                     (add-task! (irc:message-sender master) nick msg)
Note: See TracChangeset for help on using the changeset viewer.