Skip to content

Instantly share code, notes, and snippets.

@masaedw

masaedw/hack-for-hiccup.clj

Created May 7, 2011 13:12
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save masaedw/960484 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save masaedw/960484 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
hack-for-hiccup.clj
(defn my-encode-params
"Turn a map of parameters into a urlencoded string."
[params]
(letfn [(encode [s] (URLEncoder/encode (as-str s) "UTF-8"))]
(str-join "&"
(for [[k v] params]
(str (encode k) "=" (encode v))))))
(alter-var-root (var encode-params) (fn [_] my-encode-params))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment