Fixing issue with command test - should have just been a list of user-id

Cognician · Jun 17, 2013 · 69b1d2e · 69b1d2e
1 parent cdd1a9c
commit 69b1d2e
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/src/main/clojure/jarvis/command.clj b/src/main/clojure/jarvis/command.clj
@@ -61,7 +61,7 @@
       (message "tags")
       (filter #(.startsWith % ":user:"))
       (map #(user->id %)))
-    (list (str (get-user-id-from-message message)))))
+    (list (get-user-id-from-message message))))
 
 (defn- user->id [user]
-  (re-find #"\d+" user))
+  (re-find #"\d+" user))
diff --git a/src/test/clojure/jarvis/command_test.clj b/src/test/clojure/jarvis/command_test.clj
@@ -30,7 +30,7 @@
 (deftest get-user-ids-from-tags
   (is (= (list "29988" "1234" "35899")
            (command/get-user-ids-from-tags (test-util/tagged-message))))
-  (is (= (list "29983")
+  (is (= (list :29983)
         (command/get-user-ids-from-tags (test-util/message "~~help")))))
 
 (deftest get-user-id-from-message
@@ -61,4 +61,4 @@
   (is (= false
         (command/private-message? (test-util/flow-add-message))))
   (is (= false
-        (command/private-message? (test-util/flow-user-typing-message)))))
+        (command/private-message? (test-util/flow-user-typing-message)))))