Skip to content

Instantly share code, notes, and snippets.

@tomjack tomjack/core.clj Secret
Created Apr 17, 2012

Embed
What would you like to do?
(ns aleph-test.core
(:use (aleph [http :only (http-request)])))
(defn -main [& [port]]
(if-let [port (try (Integer/parseInt port)
(catch Exception _))]
(http-request {:url (str "http://localhost:" port)
:method :post
:body "foo"})
(println "Usage: lein run <PORT>")))
(defproject aleph-test "0.1.0"
:dependencies [[org.clojure/clojure "1.3.0"]
[aleph "0.2.1-beta2"]]
:main ^:skip-aot aleph-test.core)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.