   ;; if there are new tweets
   ;;   keywordize the JSON keys
   ;;   call every registered fn with the vector of maps of new tweets.
-  )+  )

         callback))

(defn my-callback [json]
  (log json))

(retrieve (.strobj {"q" "clojure"}) my-callback)


(ns twitterbuzz.core
  (:require [goog.net.Jsonp :as jsonp]
            [goog.debug :as debug]
            [goog.debug.FancyWindow :as fancy]
            [goog.debug.Logger :as logger]))

;; Temporary way to see results
(def debug-window
  (let [w (goog.debug.FancyWindow. "Twitterbuzz")
        _ (.setEnabled w true)
        _ (.init w)]
    w))

(def log (logger/getLogger "Twitterbuzz Logger"))

(defn show [x]
  (.info log (debug/expose x)))

(def twitter-uri (goog.Uri. "http://twitter.com/search.json"))

