shyblower

(deftype QuiescentLambdaCallback [closure f]
  IEquiv
    (-equiv [this other]
      (and (instance? QuiescentLambdaCallback other)
           (= (.-closure this) (.-closure other))))

  IFn
    (-invoke [this & args] (apply (.-f this) args)))

(defn lcb

shyblower

//kanso.json
{
	"name": "angular-test",
	"version": "0.0.1",
	"description": "angular test app",
	"attachments": "static",
	"modules": ["modules", "views"],
	"load": "modules/couch/couch",
	"dependencies": {
		"modules": null,

shyblower

(ns client.html.api.utils
  (:use [client.html.utils :only [clj->js]]))

(def $ js/$)

(def ajax-options {:timeout 30000})

(defn remote [type url data & {:keys [on-success on-error]}]
  (->
    (.ajax $ url