ztellman

(ns almost.haiku
  (:require [inky.sketch :as sketch]
            [dommy.core :as dom]
            [clojure.string :as str]
            [cljs.core.async :as async
             :refer [<! >! put! chan timeout]])
  (:require-macros [dommy.macros :refer [sel1 node]]
                   [cljs.core.async.macros :refer [go]]))

(enable-console-print!)

ztellman

(ns inkystarter
  "Intro sketch for inky.cc, fork away."
  (:require [inky.sketch :as sketch]))

(sketch/page-style!
  (concat
    sketch/default-styles
    [:body {:font-family "'Helvetica Neue', Arial, sans-serif"}
     :.sketch {:padding "30px"}]))

ztellman

(ns foami.core
  "FOreign Asynchronous Mechanism Interop"
  (:require [clojure.core.async :as async]))

(defn put! 
  "Takes a `ch`, a `msg`, a single arg function that when passed `true` enables backpressure
   and when passed `false` disables it, and a no-arg function which, when invoked, closes the
   upstream source."
  [ch msg backpressure! close!]
  (let [status (atom :sending]

ztellman

(ns com.x.aleph-test
  (require [aleph.http :as http]
           [manifold.deferred :as d]
           [manifold.stream :as s]
           [compojure.core :only [routes ANY GET PUT POST] :as compojure]
           [compojure.handler :as handler]
           [clj-http.client :as http-client]          
           ))

(comment