do-release ( version announcement-url -- )

Vocabulary

webapps.mason.version

Inputs

version	an object
announcement-url	an object

Outputs

None

Definition

USING: debugger io.streams.string kernel threads ;

IN: webapps.mason.version

:: do-release ( version announcement-url -- )
    [
        [ [ version announcement-url (do-release) ] try ]
        with-string-writer version send-release-email
    ] "Mason release" spawn drop ;