Skip to content

Instantly share code, notes, and snippets.

@radhikalism

radhikalism/gist:169596

Created August 18, 2009 07:52
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save radhikalism/169596 to your computer and use it in GitHub Desktop.
Save radhikalism/169596 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
diff --git a/hiredman/sandbox.clj b/hiredman/sandbox.clj
index e5f3138..4b6b4d2 100644
--- a/hiredman/sandbox.clj
+++ b/hiredman/sandbox.clj
@@ -91,13 +91,9 @@
docstring# (:doc m#)]
(if m#
(.replaceAll (str al# "; " docstring# ) "\\s+" " ")
- (let [foo# (-> hiredman.clojurebot.code-lookup/contrib
- :vars
- ((partial filter (fn [a#] (= (:name a#) (.toString '~s)))))
- first)]
- (if foo#
- (.replaceAll (str (:namespace foo#) "/" (:name foo#) ";" (print-str (:arglists foo#)) "; " (:doc foo#)) "\\s+" " ")
- "not found")))))
+ (-> hiredman.clojurebot.code-lookup/contrib
+ :vars ((partial filter (fn [a#] (= (:name a#) (.toString '~s))))) first
+ ((fn [foo#] (.replaceAll (str (:namespace foo#) "/" (:name foo#) ";" (print-str (:arglists foo#)) "; " (:doc foo#)) "\\s+" " ")))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment