check-for-updates ( chat -- )

Vocabulary

irc.gitbot

Inputs

chat

an object

Outputs

None

Definition

USING: debugger kernel mason.common mason.git ;

IN: irc.gitbot

: check-for-updates ( chat -- )
    [
        [
            git-id
            { "git" "pull" "origin" "master" }
            short-running-process git-id
        ]
    ] dip [ report-updates ] curry compose try ;