sender ( irc-message -- sender )

Vocabulary

irc.messages.parser.private

Inputs

irc-message

an object

Outputs

sender

an object

Definition

USING: accessors kernel splitting ;

IN: irc.messages.parser.private

: sender ( irc-message -- sender )
    prefix>>
    [ ":" ?head drop "!" split-at-first drop ] [ f ] if* ;