From 0bf057e1401b36a7664b56412785ff712d0fbb99 Mon Sep 17 00:00:00 2001
From: tilpner
Date: Sun, 12 Aug 2018 21:12:38 +0200
Subject: Allow symbol arguments to gh-set-name

---
 modules/3-gh/default.rkt | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'modules/3-gh')

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)))
 
-- 
cgit v1.2.3