Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@Raynes
Created June 7, 2010 00:01
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 Raynes/428048 to your computer and use it in GitHub Desktop.
Save Raynes/428048 to your computer and use it in GitHub Desktop.
(do (clojure.core/defmethod sexpbot.respond/respond :scheck [{:keys [irc channel args nick]}] (ircb/send-message irc channel (str nick ": " (-> args first (correct *nwords*))))) (clojure.core/let [pns__2263__auto__ clojure.core/*ns*] (clojure.core/defn load-this-plugin [irc__2264__auto__] (clojure.core/let [m-name__2265__auto__ (clojure.core/keyword (clojure.core/last (.split (clojure.core/str pns__2263__auto__) "\\.")))] (clojure.core/println m-name__2265__auto__) (clojure.core/dosync (clojure.core/println "\n\nWorks!!!\n\n") (clojure.core/alter irc__2264__auto__ clojure.core/assoc-in [:modules m-name__2265__auto__] {:unload (clojure.core/fn [] (clojure.core/dosync (clojure.core/alter irc__2264__auto__ clojure.core/update-in [:commands] clojure.core/dissoc m-name__2265__auto__) (clojure.core/alter irc__2264__auto__ clojure.core/update-in [:hooks] clojure.core/dissoc m-name__2265__auto__))), :load (clojure.core/fn [] (clojure.core/dosync (clojure.core/alter irc__2264__auto__ clojure.core/assoc-in [:commands m-name__2265__auto__] {"scheck" {:cmd :scheck, :doc "Spell checks a word for you."}}) (clojure.core/alter irc__2264__auto__ clojure.core/assoc-in [:hooks m-name__2265__auto__] nil))), :cleanup #<respond$defplugin$fn__2269 sexpbot.respond$defplugin$fn__2269@492ff1>}))))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment