summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authortilpner2018-08-12 21:12:38 +0200
committertilpner2018-08-12 21:12:38 +0200
commit0bf057e1401b36a7664b56412785ff712d0fbb99 (patch)
treeb01fb1f6b37492d613c12c737f566835ab4c65d3
parent5175a24a3a0671313a2bfbc9cafe8f9a099c95de (diff)
downloadmeep-0bf057e1401b36a7664b56412785ff712d0fbb99.tar.gz
meep-0bf057e1401b36a7664b56412785ff712d0fbb99.tar.xz
meep-0bf057e1401b36a7664b56412785ff712d0fbb99.zip
Allow symbol arguments to gh-set-name
-rw-r--r--modules/3-gh/default.rkt6
1 files changed, 3 insertions, 3 deletions
diff --git a/modules/3-gh/default.rkt b/modules/3-gh/default.rkt
index 0705fe4..abe6dd9 100644
--- a/modules/3-gh/default.rkt
+++ b/modules/3-gh/default.rkt
@@ -1,6 +1,6 @@
#lang racket/base
-(require irc/bot irc/command irc/storage
- racket/runtime-path
+(require irc/core irc/bot irc/command irc/storage
+ racket/runtime-path racket/format
racket/string racket/file net/url json)
(provide (all-defined-out))
@@ -36,7 +36,7 @@
(define-command (gh-set-name nick)
#:help "Set GitHub handle to be associated with your IRC user"
(ref-set! (user-storage (source))
- nick
+ (~a nick)
'github 'name)
(persist-user (source)))