updates ( from to -- lines )

Vocabulary

irc.gitbot

Inputs

from	an object
to	an object

Outputs

lines

an object

Definition

USING: kernel math sequences ;

IN: irc.gitbot

: updates ( from to -- lines )
    git-log reverse dup length 4 >
    [ 4 head "... and more" suffix ] when ;