diff options
| author | tilpner | 2018-08-12 21:13:19 +0200 |
|---|---|---|
| committer | tilpner | 2018-08-12 21:13:19 +0200 |
| commit | 4c917d4ffc5d55110e96ca4ae6da55bbea275038 (patch) | |
| tree | e2fdb8454b4f1abb51fb521f28f4845c303b823a | |
| parent | 0bf057e1401b36a7664b56412785ff712d0fbb99 (diff) | |
| download | meep-4c917d4ffc5d55110e96ca4ae6da55bbea275038.tar.gz meep-4c917d4ffc5d55110e96ca4ae6da55bbea275038.tar.xz meep-4c917d4ffc5d55110e96ca4ae6da55bbea275038.zip | |
Update ibip url again, add (source) command
| -rw-r--r-- | modules/3-ibip.rkt | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/modules/3-ibip.rkt b/modules/3-ibip.rkt index 3e38f82..08d63ca 100644 --- a/modules/3-ibip.rkt +++ b/modules/3-ibip.rkt @@ -1,8 +1,14 @@ #lang racket/base -(require irc/bot) +(require irc/bot irc/command) ; See https://git.teknik.io/Teknikode/IBIP +(define source "git.tx0.co/meep") + (on (and (command-is 'PRIVMSG) (suffix-is ".bots")) - (reply "Reporting in! [Racket] git://tx0.co/meep")) + (reply (format "Reporting in! [Racket] ~a" source))) + +(define-command (source) + #:help "Display bot repo location" + (reply source)) |