steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

irc.gitbot: don't stop the alarm if running git throws an error

release
Slava Pestov 2010-03-23 01:55:50 -04:00
parent 6299e746f1
commit bc174332d1
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
extra/irc/gitbot/gitbot.factor
View File

@ -1,4 +1,4 @@
! Copyright (C) 2008 Slava Pestov. ! Copyright (C) 2008, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: fry irc.client irc.client.chats kernel namespaces USING: fry irc.client irc.client.chats kernel namespaces
sequences threads io.launcher io splitting sequences threads io.launcher io splitting
@ -46,8 +46,10 @@ M: object handle-message drop ;
'[ _ speak ] interleave ; '[ _ speak ] interleave ;
: check-for-updates ( chat -- ) : check-for-updates ( chat -- )
[ git-id git-pull-cmd short-running-process git-id ] dip '[
report-updates ; git-id git-pull-cmd short-running-process git-id
_ report-updates
] try ;
: bot ( -- ) : bot ( -- )
start-bot start-bot