irc-link ( channel -- string )

Vocabulary

webapps.irc-log

Inputs

channel

an object

Outputs

string

an object

Definition

USING: calendar formatting kernel prettyprint sequences ;

IN: webapps.irc-log

: irc-link ( channel -- string )
    now -7 hours convert-timezone >date< [ unparse 2 tail ] 2dip
    "https://bespin.org/~nef/logs/%s/%02s.%02d.%02d" sprintf ;