Permalink
Browse files

Fix tryhaskell command.

  • Loading branch information...
Raynes committed Jan 16, 2013
1 parent 96fab3f commit 3fe14b32505476cf24c94fcb8bd15a78f3547f59
Showing with 2 additions and 1 deletion.
  1. +2 −1 src/lazybot/plugins/haskell.clj
@@ -8,7 +8,8 @@
(def tryurl "http://tryhaskell.org/haskell.json")
(defn cull [js]
- (if-let [result (seq (:result js))] result (:error js)))
+ (or (seq (get js "result"))
+ (get js "error")))
(def cap 300)

0 comments on commit 3fe14b3

Please sign in to comment.