Support spaces instead of colons in timers.

Raynes · Feb 27, 2014 · 04fd054 · 04fd054
1 parent 7436290
commit 04fd054
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/lazybot/plugins/timer.clj b/src/lazybot/plugins/timer.clj
@@ -27,10 +27,11 @@
                              :message (:message spec)})))))
 
 (defn parse-message [s nick]
-  (let [[offset message] (s/split s #" " 2)]
+  (let [split-re #"(\d+)[: ](\d+)[: ](\d+)(?: (.+))?"
+        [_ hour minute second msg] (re-find split-re s)]
     (-> (zipmap [:hour :minute :second]
-                (map #(Long. %) (s/split offset #":")))
-        (assoc :message (or message nick)))))
+                (map #(Long. %) [hour minute second]))
+        (assoc :message (or msg nick)))))
 
 (defplugin
   (:cmd