c14f3512a6ee
Minor jumpbot tweaks.
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Wed, 31 Aug 2011 19:13:21 -0400 |
| parents | 336987d72de4 |
| children | 7942222da830 |
| branches/tags | (none) |
| files | src/examples/jumpbot.clj |
Changes
--- a/src/examples/jumpbot.clj Wed Aug 31 18:50:53 2011 -0400 +++ b/src/examples/jumpbot.clj Wed Aug 31 19:13:21 2011 -0400 @@ -15,6 +15,7 @@ (defn make-jumpbot [server username] (let [bot (core/connect server username)] (events/add-handler bot :dead #'handle-dead) - (loops/add-loop bot #'jump 3000 :jump-loop) + (loops/add-loop bot #'jump 2000 :jump-loop) + (Thread/sleep 10000) bot))