cjl - Add stubs for board fns

cjl - Add stubs for board fns

--- src/icfp2015/core.clj
+++ src/icfp2015/core.clj
@@ -11,6 +11,30 @@
         truncate-bits (fn [x] (bit-and (bit-shift-right x 16) 0x7FFF))]
     (map truncate-bits (raw-seq seed))))

+; board state is represented as a current-unit together with its currently
+; filled-and-locked cells
+; e.g. { :current-unit { :members [2 0] [0 1] [2 2] :pivot [1 1] }
+;        :filled #{ [5 4] [4 3] } }
+(defn make-board
+  "Creates a new new board with an initial-unit"
+  [w h filled initial-unit]
+  nil)
+
+; these are possible commands
+; [ [:move :west] [:move :east] [:move :southwest] [:move :southeast]
+;   [:rotate :clockwise] [:rotate :counterclockwise] ]
+(defn transition-board
+  "Given a board and command, returns a new board. Raises if performing
+  the command puts the board into an illegal state"
+  [board command]
+  nil)
+
+(defn lock-and-spawn
+  "Locks the current unit. Clears rows. Moves cells down. Spawns new unit.
+  Raises if new-unit cannot be spawned"
+  [board new-unit]
+  nil)
+
 (defn -main
   "I don't do a whole lot ... yet."
   [& args]


Atom generator tag fix

Atom generator tag fix

--- src/io/perun/atom.clj
+++ src/io/perun/atom.clj
@@ -27,7 +27,8 @@
        [:title site-title]
        (if (seq description)
          [:subtitle description])
-       [:generator {:uri "https://perun.io/" :rel "self"} "Perun"]
+       ;; FIXME: :version property
+       [:generator {:uri "https://perun.io/"} "Perun"]
        [:link {:href (str base-url filename) :rel "self"}]
        [:link {:href base-url :type "text/html"}]
        [:updated (->> (take 10 posts)


separate about and search from categories

--- src/beebster_clj/views.clj
+++ src/beebster_clj/views.clj
@@ -9,16 +9,16 @@
   "universal bootstrap header for all beebster sites."
   [links]
   (html
-   [:div.navbar.navbar-inverse.navbar-fixed-top
+   [:nav.navbar.navbar-inverse.navbar-fixed-top {:role "navigation"}
     [:div.navbar-inner
      [:div.container
-      [:div.nav-collapse.collapse
-       [:ul.nav
+      [:ul.nav.navbar-left
+       (for [link categories]
+         [:li.active.navbar-left
+          [:a {:href (apply str "/categories?category=" link)} link]])
+       [:ul.nav.navbar-right
         (for [[url description] links]
-          [:li.active [:a {:href url} description]])
-        (for [link categories]
-          [:li.active
-           [:a {:href (apply str "/categories?category=" link)} link]])]]]]]))
+          [:li.active.navbar-right [:a {:href url} description]])]]]]]))

 (defn base-template
   "base html template for all beebster sites."
@@ -50,10 +50,10 @@
    [:h2.header "Search"]
    [:div.sform
     [:form {:method "post" :role "form" :action "/results"}
-     [:div.form-group
+     [:div.tfield
       [:p "Enter Search term:"]
       [:input.form-control {:type "text" :name "searchvalue" }]]
-     [:div.form-group
+     [:div.sbut
       [:input {:type "submit" :value "Search" :class "btn btn-default"}]]]]))

 (defn about-page


add flag to turn off defaults for make

add flag to turn off defaults for make

--- src/karras/entity.clj
+++ src/karras/entity.clj
@@ -72,12 +72,12 @@

 (defmethod convert :reference
   [field-spec val]
-  (with-meta (make (:of field-spec) val)
+  (with-meta (make (:of field-spec) val :no-defaults)
     {:cache (atom nil)}))

 (defmethod convert :references
   [field-spec vals]
-  (with-meta (map (partial make (:of field-spec)) vals)
+  (with-meta (map #(make (:of field-spec) % :no-defaults) vals)
     {:cache (atom nil)}))

 (defmethod convert :default
@@ -86,15 +86,16 @@

 (defn make
   "Converts a hashmap to the supplied type."
-  [#^Class type hmap]
+  [#^Class type hmap & [no-defaults]]
   (let [fields (-> type entity-spec :fields)
         has-key? (fn [e k]
                    (try (some #{k} (keys e))
-                        (catch Exception _ nil)))]
+                        (catch Exception _ nil)))
+        make-default? #(and (nil? no-defaults) (:default %))]
     (reduce (fn [entity [k field-spec]]
               (cond
                (has-key? entity k)   (assoc entity k (convert field-spec (k hmap)))
-               (:default field-spec) (assoc entity k (:default field-spec))
+               (make-default? field-spec) (assoc entity k (:default field-spec))
                :otherwise            entity))
             (with-meta (merge (.newInstance type) hmap) (meta hmap))
             fields)))


Add another migration for demo purposes.

--- src/cadence/migrations.clj
+++ src/cadence/migrations.clj
@@ -16,3 +16,8 @@
   (do (mc/update "users" {} {$set {:roles [:user]}} :multi true)
       (mc/update "users" {:username "RyanMcG"} {$push {:roles :admin}}))
   (mc/update "users" {} {$unset {:roles ""}} :multi true))
+
+(defmigration "Change my name (just for demo)"
+  "51571b7244aedb2065e2a3d7"
+  (mc/update "users" {:username "RyanMcG"} {$set {:name "Ryan Vincent McGowan"}})
+  (mc/update "users" {:username "RyanMcG"} {$set {:name "Ryan McGowan"}}))


Fix bug in run task with no args.

Fix bug in run task with no args.

--- src/leiningen/run.clj
+++ src/leiningen/run.clj
@@ -24,7 +24,7 @@
     :run-aliases {:alias a.namespace
                   :alias2 another.namespace}"
   [project & [flag & args]]
-  (let [flag (read-string flag)
+  (let [flag (and flag (read-string flag))
         alias (and (keyword? flag) (flag (:run-aliases project)))]
     (cond alias           (apply run project "-m" (cons alias args))
           (= flag '-m)    (apply run-main project args)


added parameter check

added parameter check

--- src/link/socketio.clj
+++ src/link/socketio.clj
@@ -19,11 +19,15 @@
   (id [this]
     (str (.getSessionId this)))
   (send* [this msg cb]
-    (let [{evt :event data :data} msg]
-     (.sendEvent this evt
-                 (proxy [VoidAckCallback] []
-                   (onSuccess [r]
-                     (cb))) (into-array Object [data]))))
+    (if-not (map? msg)
+      (throw (IllegalArgumentException. "Msg must be a map contains :event and :data."))
+      (let [{evt :event data :data} msg]
+        (if-not evt
+          (throw (IllegalArgumentException. "Event name must not be nil."))
+          (.sendEvent this evt
+                      (proxy [VoidAckCallback] []
+                        (onSuccess [r]
+                          (cb))) (into-array Object [data]))))))
   (send [this msg]
     (send* this msg (fn [])))
   (channel-addr [this]


middleware namespace adjustment in core

middleware namespace adjustment in core

--- src/listopia/core.clj
+++ src/listopia/core.clj
@@ -1,6 +1,5 @@
 (ns listopia.core
-  (:require [listopia.items.middleware :refer [wrap-db
-                                               wrap-server]]
+  (:require [listopia.items.middleware :as items.middleware]
             [listopia.routes :as routes])
   (:require [ring.adapter.jetty :as jetty]
             [ring.middleware.reload :refer [wrap-reload]]
@@ -14,14 +13,14 @@

 (def app
   (-> routes/combined-routes
-      wrap-anti-forgery        ; csrf protection
-      wrap-session             ; session data
-      wrap-params              ; url-encoded param support
-      wrap-db                  ; add db/conn string into params
-      wrap-server              ; set server name header
-      (wrap-resource "static") ; set static asset path
-      wrap-file-info           ; add file info to static resources
-      wrap-webjars))           ; set asset path for webjar assets
+      wrap-anti-forgery            ; csrf protection
+      wrap-session                 ; session data
+      wrap-params                  ; url-encoded param support
+      items.middleware/wrap-db     ; add db/conn string into params
+      items.middleware/wrap-server ; set server name header
+      (wrap-resource "static")     ; set static asset path
+      wrap-file-info               ; add file info to static resources
+      wrap-webjars))               ; set asset path for webjar assets

 (defn -main
   ([] (-main 8000))


Remove potentially blocking call to .put on LinkedBlockingQueue

--- src/marcgrep/core.clj
+++ src/marcgrep/core.clj
@@ -13,7 +13,7 @@
            [java.io BufferedReader ByteArrayInputStream FileOutputStream PrintWriter]
            [java.util Date]
            [java.security MessageDigest]
-           [java.util.concurrent LinkedBlockingQueue]
+           [java.util.concurrent LinkedBlockingQueue TimeUnit]
            (org.mortbay.jetty Server Request Response))
   (:require [marcgrep.predicates :as predicates]
             [compojure.route :as route]
@@ -218,6 +218,20 @@
              (recur))))))))

+(defn offer-while
+  "Keep trying to add an element to a queue, stopping every now and then to
+check whether a predicate still holds.  If the predicate becomes false, just
+give up and go home.
+
+Returns true if adding the item eventually succeeds.  False otherwise."
+  [^LinkedBlockingQueue queue item pred]
+  (loop []
+    (or (.offer queue item (long 10) TimeUnit/SECONDS)
+        (if (pred)
+          (recur)
+          false))))
+
+
 (defn run-jobs
   "Run a list of jobs.  Spread the work across a bunch of workers and take care
 of gathering up and collating their results."
@@ -239,9 +253,11 @@
         (if (every? future-done? workers)
           nil                           ; slackers!
           (if-let [record (.next marc-records)]
-            (do (.put queue record)
-                (recur))
-            (.put queue :eof)))))
+            (when (offer-while queue record
+                               #(not-every? future-done? workers))
+              (recur))
+            (offer-while queue :eof
+                         #(not-every? future-done? workers))))))

     (doseq [worker workers] @worker)


removed meta_doc

removed meta_doc

--- src/meta_doc/core.clj
+++ src/meta_doc/core.clj
@@ -1,105 +0,0 @@
-(ns meta-doc.core
-  (:require [clojure.string :as s]
-            ;; [clojure2d.core :refer [with-canvas]]
-            ))
-
-(def ^:dynamic *load-examples* true)
-(def ^:dynamic *alter-doc* true)
-
-(def ^:const ^String new-line (System/getProperty "line.separator"))
-
-(def escape-map {(char 0xffff) "\\0xffff"})
-
-(defn alter-info
-  ""
-  [tag f s v]
-  (when-let [tag-val (tag (meta v))]
-    (let [doc (:doc (meta v))]
-      (alter-meta! v assoc :doc (str doc new-line new-line (f tag-val s v))))))
-
-(def alter-const-info (partial alter-info :const #(s/escape (str "Constant value `" %2 " = " (var-get %3) "`") escape-map)))
-(def alter-tag-info (partial alter-info :tag (fn [t & _] (str "Type: " (if (fn? t) (last (s/split (str (type t)) #"\$")) t)))))
-
-(defn alter-docs
-  ""
-  ([] (alter-docs *ns*))
-  ([ns]
-   (when *alter-doc*
-     (doseq [[s v] (ns-publics ns)]
-       (alter-const-info s v)
-       (alter-tag-info s v)))))
-
-;; (alter-docs)
-
-;;
-(comment
-
-  (defmacro example
-    "Create example as vector of desription, literal example and function returning result."
-    ([description xample]
-     `[~description ~(str xample) (fn [] ~xample)]))
-
-  (defn make-examples
-    "Creates vector of examples."
-    [& examples]
-    (vec examples))
-
-  (defn eval-examples
-    "Evaluate examples created by make-examples macro."
-    [examples]
-    (map #(let [[description example example-fn] %]
-            [description example (example-fn)]) examples))
-
-  (defmacro with-examples
-    "Attach provided examples to given var definition."
-    [definition & examples]
-    (if *load-examples*
-      `(doto ~definition (alter-meta! assoc :examples (make-examples ~@examples)))
-      definition))
-
-  (defmacro defexamples
-    "Defines examples function with name description and list of unit examples"
-    [name description & examples]
-    (when *load-examples*
-      `(def ~(vary-meta name assoc :examples (vec examples) :doc description)
-         (fn [] (eval-examples (make-examples ~@examples))))))
-
-  (defmacro set-examples
-    "Adds examples to the existing var"
-    [name & examples]
-    (when *load-examples*
-      `(alter-meta! (var ~name) assoc :examples (conj (or (:examples (meta (var ~name))) []) ~@examples))))
-
-  ;;
-
-  (defn eval-vars-examples
-    "Generate map with vars and its examples"
-    [vars]
-    (for [[ns vars] (group-by (comp :ns meta) vars)]
-      {:ns ns
-       :vars (map #(when-let [ex (:examples (meta %))]
-                     {(:name (meta %)) (eval-examples ex)}) vars)}))
-
-  (eval-vars-examples [(var my-first-examples) (var extest)])
-
-;;;;;;;;;;
-
-  (defexamples my-first-examples
-    "Tddfsf"
-    (example "blah" 1.0)
-    (example "sferer" (let [a 1] a)))
-
-
-
-  (with-examples
-    (def ^:privatsdfsdf extest 123)
-    (example "blah" (inc extest)))
-
-  (my-first-examples)
-
-  (set-examples extest
-                (example "123" 3.0))
-
-
-  (eval-examples (:examples (meta (var extest))))
-  )


Set os and arch private

Set os and arch private

--- src/naughtmq/core.clj
+++ src/naughtmq/core.clj
@@ -3,7 +3,7 @@
             [pandect.core :as p]
             [clojure.java.io :as io]))

-(defn os
+(defn- os
   "Returns a string representing the current operating system, one of win,
   linux, or mac."
   []
@@ -16,7 +16,7 @@
           (throw (UnsupportedOperationException.
                    (str "Unsupported platform: " os-name ", " os-arch))))))

-(defn arch
+(defn- arch
   "Returns a string representing the current architecture, one of x86 or
   x86_64."
   []


Add new shaders functions.

Add new shaders functions.

--- src/quil/core.clj
+++ src/quil/core.clj
@@ -1566,9 +1566,9 @@
     :added "1.0"}
   display-filter
   "Originally named filter in Processing Language.
-  Filters the display window with the specified mode and level. Level
-  defines the quality of the filter and mode may be one of the
-  following keywords:
+  Filters the display window with the specified mode and level or using
+  given shader (only in :p2d and :p3d modes). Level defines the quality
+  of the filter and mode may be one of the following keywords:

   :threshold - converts the image to black and white pixels depending
                if they are above or below the threshold defined by
@@ -1590,9 +1590,16 @@
                level parameter.
   :dilate    - increases the light areas with the amount defined by
                the level parameter."
-  ([mode]
-     (let [mode (resolve-constant-key mode filter-modes)]
-       (.filter (current-surface) (int mode))))
+  ([mode-or-shader]
+    (cond (keyword? mode-or-shader)
+          (let [mode (resolve-constant-key mode-or-shader filter-modes)]
+            (.filter (current-surface) (int mode)))
+
+          (instance? processing.opengl.PShader mode-or-shader)
+          (.filter (current-surface) ^processing.opengl.PShader mode-or-shader)
+
+          :else
+          (throw (IllegalArgumentException. "(filter mode-or-shader) takes only keyword or PShader"))))
   ([mode level]
      (let [mode (resolve-constant-key mode filter-modes)]
        (.filter (current-surface) (int mode) (float level)))))
@@ -2131,6 +2138,20 @@

 (defn
   ^{:requires-bindings true
+    :processing-name "loadShader()"
+    :category "Rendering"
+    :subcategory "Shaders"
+    :added "2.0"}
+  load-shader
+  "Loads a shader into the PShader object. Shaders are compatible with the
+  P2D and P3D renderers, but not with the default renderer."
+  ([fragment-filename]
+    (.loadShader (current-surface) fragment-filename))
+  ([fragment-filename vertex-filename]
+    (.loadShader (current-surface) fragment-filename vertex-filename)))
+
+(defn
+  ^{:requires-bindings true
     :processing-name "loadShape()"
     :category "Shape"
     :subcategory "Loading & Displaying"
@@ -2888,10 +2909,14 @@
     :added "1.0"}
   rect
   "Draws a rectangle to the screen. A rectangle is a four-sided shape
-   with every angle at ninety degrees. By default, the first two
-   parameters set the location of the upper-left corner, the third
-   sets the width, and the fourth sets the height. These parameters
-   may be changed with rect-mode."
+  with every angle at ninety degrees. By default, the first two
+  parameters set the location of the upper-left corner, the third
+  sets the width, and the fourth sets the height. These parameters
+  may be changed with rect-mode.
+
+  To draw a rounded rectangle, add a fifth parameter, which is used as
+  the radius value for all four corners. To use a different radius value
+  for each corner, include eight parameters."
   ([x y width height]
      (.rect (current-surface) (float x) (float y) (float width) (float height)))
   ([x y width height r]
@@ -3004,6 +3029,26 @@
   equivalent function in OpenGL is glLoadIdentity()"
   []
   (.resetMatrix (current-surface)))
+
+(def ^{:private true}
+     shader-modes {:points PApplet/POINTS
+                   :lines PApplet/LINES
+                   :triangles PApplet/TRIANGLES})
+
+(defn
+  ^{:requires-bindings true
+    :processing-name "resetShader()"
+    :category "Rendering"
+    :subcategory "Shaders"
+    :added "2.0"}
+  reset-shader
+  "Restores the default shaders. Code that runs after (reset-shader) will
+  not be affected by previously defined shaders. Optional 'kind' parameter -
+  type of shader, either :points, :lines, or :triangles"
+  ([] (.resetShader (current-surface)))
+  ([kind]
+    (let [mode (resolve-constant-key kind shader-modes)]
+      (.resetShader (current-surface) mode))))

 (defn
   ^{:requires-bindings true
@@ -3303,6 +3348,21 @@
   image."
   [x y ^PImage src]
   (.set (current-surface) (int x) (int y) src))
+
+(defn
+  ^{:requires-bindings true
+    :processing-name "shader()"
+    :category "Rendering"
+    :subcategory "Shaders"
+    :added "2.0"}
+  shader
+  "Applies the shader specified by the parameters. It's compatible with the :p2d
+  and :p3drenderers, but not with the default :java2d renderer. Optional 'kind'
+  parameter - type of shader, either :points, :lines, or :triangles"
+  ([shader] (.shader (current-surface) shader))
+  ([shader kind]
+    (let [mode (resolve-constant-key kind shader-modes)]
+      (.shader (current-surface) shader mode))))

 (defn
   ^{:requires-bindings true


format

format

--- src/metabase/util.clj
+++ src/metabase/util.clj
@@ -158,17 +158,17 @@
   [hostname port]
   (try
     (let [sock-addr (InetSocketAddress. hostname port)
-        timeout 5000]
-     (with-open [sock (Socket.)]
-       (. sock connect sock-addr timeout)
-       true))
-     (catch Exception _ false)))
+          timeout 5000]
+      (with-open [sock (Socket.)]
+        (. sock connect sock-addr timeout)
+        true))
+    (catch Exception _ false)))

 (defn host-up?
   "Returns true if the host given by hostname is reachable, false otherwise "
   [hostname]
   (try
     (let [host-addr (. InetAddress getByName hostname)
-        timeout 5000]
+          timeout 5000]
       (. host-addr isReachable timeout))
-      (catch Exception _ false)))+    (catch Exception _ false)))


check if there is a recording to play before trying to play one

--- src/parinfer/vcr.cljs
+++ src/parinfer/vcr.cljs
@@ -81,35 +81,36 @@
   [key-]
   (when-let [stop-chan (get-in @vcr [key- :stop-chan])]
     (close! stop-chan))
-  (swap! vcr assoc-in [key- :stop-chan] (chan))
-  (let [cm (get-in @state [key- :cm])
-        recording (get @vcr key-)
-        timescale (get recording :timescale 1)
-        loop? (get recording :loop? true)
-        loop-delay (get recording :loop-delay 2000)
-        element (.getWrapperElement cm)
-        cursor (gdom/getElementByClass "CodeMirror-cursors" element)]
-    (set! (.. cursor -style -visibility) "visible")
-    (go-loop []
-      (swap! state assoc-in [key- :text] (:init-value recording))
-      (loop [changes (:changes recording)]
-        (when (seq changes)
-          (let [{:keys [change selections dt] :as data} (first changes)
-                tchan (timeout (/ dt timescale))
+  (when (seq (get-in @vcr [key- :changes]))
+    (swap! vcr assoc-in [key- :stop-chan] (chan))
+    (let [cm (get-in @state [key- :cm])
+          recording (get @vcr key-)
+          timescale (get recording :timescale 1)
+          loop? (get recording :loop? true)
+          loop-delay (get recording :loop-delay 2000)
+          element (.getWrapperElement cm)
+          cursor (gdom/getElementByClass "CodeMirror-cursors" element)]
+      (set! (.. cursor -style -visibility) "visible")
+      (go-loop []
+        (swap! state assoc-in [key- :text] (:init-value recording))
+        (loop [changes (:changes recording)]
+          (when (seq changes)
+            (let [{:keys [change selections dt] :as data} (first changes)
+                  tchan (timeout (/ dt timescale))
+                  stop-chan (:stop-chan recording)
+                  [v c] (alts! [tchan stop-chan])]
+              (when (not= c stop-chan)
+                (cond
+                  change (apply-change cm change)
+                  selections (apply-selections cm selections)
+                  :else nil)
+                (recur (rest changes))))))
+        (when loop?
+          (let [tchan (timeout loop-delay)
                 stop-chan (:stop-chan recording)
                 [v c] (alts! [tchan stop-chan])]
             (when (not= c stop-chan)
-              (cond
-                change (apply-change cm change)
-                selections (apply-selections cm selections)
-                :else nil)
-              (recur (rest changes))))))
-      (when loop?
-        (let [tchan (timeout loop-delay)
-              stop-chan (:stop-chan recording)
-              [v c] (alts! [tchan stop-chan])]
-          (when (not= c stop-chan)
-            (recur)))))))
+              (recur))))))))

 (defn stop-playing!
   [key-]


trying to limit memory.

trying to limit memory.

--- src/play_clj/core.clj
+++ src/play_clj/core.clj
@@ -77,10 +77,9 @@
                           (exec func {}))
                       ([func options]
                           (when func
-                            (let [screen-map (merge @screen options)
-                                  old-entities @entities]
+                            (let [old-entities @entities]
                               (some->> (with-meta
-                                         #(normalize (func screen-map old-entities))
+                                         #(normalize (func @screen old-entities options))
                                          (meta func))
                                        (wrapper screen)
                                        (reset-changed! entities old-entities)
@@ -116,8 +115,11 @@
                       (update-fn! assoc :contact-listener)
                       update-screen!))
      :render (fn [d]
-               (swap! screen update-in [:total-time] #(+ (or %1 0) %2) d)
-               (execute-fn! on-render (assoc @screen :delta-time d)))
+               (swap! screen (fn [s]
+                               (-> s
+                                   (assoc :delta-time d)
+                                   (update-in [:total-time] #(+ (or %1 0) d)))))
+               (execute-fn! on-render @screen))
      :hide #(execute-fn! on-hide)
      :pause #(execute-fn! on-pause)
      :resize (fn [w h]


Draw notes across whole width of their piano-key

--- src/playmary/one.cljs
+++ src/playmary/one.cljs
@@ -32,14 +32,11 @@
 (defn note-rect
   [{on :on off :off freq :freq :as note}
    {px-per-ms :px-per-ms playhead :playhead :as instrument}]
-  (let [piano-key-w (piano-key-width instrument)
-        note-w 4
-        note-left (* piano-key-w (util/index-of (-> instrument :piano-keys keys) freq))]
-    {:x (- (+ note-left (/ piano-key-w 2))
-           (/ note-w 2))
+  (let [piano-key-w (piano-key-width instrument)]
+    {:x (* piano-key-w (get-in instrument [:piano-keys freq :n]))
      :y (+ (t->px instrument on)
            (/ (-> instrument :h) 2))
-     :w note-w
+     :w piano-key-w
      :h (- (t->px instrument (or off playhead))
            (t->px instrument on))}))


Update intro.cljs

Update intro.cljs

updated survival rate to 30 day survival rate in the key point section

--- src/prais2/intro.cljs
+++ src/prais2/intro.cljs
@@ -101,7 +101,7 @@
     [:li "If one hospital has a higher survival rate than another hospital it does not mean that it is better than the other"]
     [:li "The predicted range is calculated by a formula and depends " [:b "only"] " on the children treated at that hospital. A " [:b "lower"] " predicted range means a hospital treated children with " [:b "more complex"] " medical problems." ]
     [:li "A hospital's survival rate should only be compared to its predicted range. It is not valid to compare survival rates between hospitals."]
-    [:li "The survival rate for all UK hospitals is very high."]]])
+    [:li "The 30-day survival rate for all UK hospitals is very high."]]])


Add then' variant (analogous to map).

Add then' variant (analogous to map).

--- src/promesa/core.cljc
+++ src/promesa/core.cljc
@@ -145,6 +145,17 @@
                  out
                  (pt/-promise out))))]
      (pt/-bind p handle executor))))
+
+(defn then'
+  "Chains a computation `f` (function) to be executed when the promise
+  `p` is successfully resolved.
+
+  The computation will be executed in the calling thread by default;
+  you also can provide a custom executor.
+
+  Don't perform flatten on the result."
+  ([p f] (pt/-map p f exec/current-thread-executor))
+  ([p f executor] (pt/-map p f executor)))

 (defn bind
   "Backward compatibility alias to `then`."


Always wrap set-screen! with on-gl to prevent race condition when run in the middle of a Screen method (via brycecovert)

--- src/play_clj/core.clj
+++ src/play_clj/core.clj
@@ -515,20 +515,20 @@
   (let [run-fn! (fn [k & args]
                   (doseq [screen screen-objects]
                     (apply (get screen k) args)))]
-    (.setScreen game-object
-      (reify Screen
-        (show [this]
-          (input! :set-input-processor (InputMultiplexer.))
-          (run-fn! :show)
-          (doseq [{:keys [screen]} screen-objects]
-            (doseq [[_ listener] (:input-listeners @screen)]
-              (add-input! listener))))
-        (render [this d] (run-fn! :render d))
-        (hide [this] (run-fn! :hide))
-        (pause [this] (run-fn! :pause))
-        (resize [this w h] (run-fn! :resize w h))
-        (resume [this] (run-fn! :resume))
-        (dispose [this])))))
+    (on-gl (.setScreen game-object
+                       (reify Screen
+                         (show [this]
+                           (input! :set-input-processor (InputMultiplexer.))
+                           (run-fn! :show)
+                           (doseq [{:keys [screen]} screen-objects]
+                             (doseq [[_ listener] (:input-listeners @screen)]
+                               (add-input! listener))))
+                         (render [this d] (run-fn! :render d))
+                         (hide [this] (run-fn! :hide))
+                         (pause [this] (run-fn! :pause))
+                         (resize [this w h] (run-fn! :resize w h))
+                         (resume [this] (run-fn! :resume))
+                         (dispose [this]))))))

 (defn set-screen-wrapper!
   "Sets a function that wraps around all screen functions, allowing you to


Update intro.cljs

Update intro.cljs

Christina - i've removed the line about the predicted range not depending on judgments about a hospital's quality from the key points at the top because this bit suddenly became very long! I think what is there now should do the job... i've also added a bit of bold to this key point, bolding "only", "lower" and "more".

--- src/prais2/intro.cljs
+++ src/prais2/intro.cljs
@@ -99,7 +99,7 @@
    [:h2 "Key points"]
    [:ul
     [:li "If one hospital has a higher survival rate than another hospital it does not mean that it is better than the other"]
-    [:li "The predicted range is calculated by a formula and depends only on the children treated at that hospital. It does not use any judgement about a hospital’s quality. A lower predicted range means a hospital treated children with more complex medical problems." ]
+    [:li "The predicted range is calculated by a formula and depends " [:b "only"] " on the children treated at that hospital. A " [:b "lower"] " predicted range means a hospital treated children with " [:b "more"] " complex medical problems." ]
     [:li "The survival rate for all UK hospitals is very high."]]])


CMR-496: Wired up in-memory index queue.

--- index-queue-app/src/cmr/index_queue/queue/memory_queue.clj
+++ index-queue-app/src/cmr/index_queue/queue/memory_queue.clj
@@ -9,7 +9,8 @@

 (defrecord MemoryIndexQueue
   [
-   ;; this implementation has no state - requests are handled immediately
+   ;; This implementation has no state - asynchronous calling is handled with futures
+   ;; to simulate a queue.
    ]

   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -26,19 +27,19 @@

 (index-concept
     [context concept-id revision-id]
-    "Index the given concpet revision")
+    (future (indexer/index-concept context concept-id revision-id)))

   (delete-concept-from-index
     [context concept-id revision-id]
-    "Remove the given concept revision")
+    (future (indexer/delete-concept-from-index context concept-id revision-id)))

   (delete-provider-from-index
     [context provider-id]
-    "Remove a provider and all its concepts from the index")
+    (future (indexer/delete-provider-from-index context provider-id)))

   (reindex-provider-collections
     [context provider-id]
-    "Reindexes all the concepts for the given provider"))
+    (future (indexer/reindex-provider-collections context provider-id))))

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


query: swap out clojure read-string for edn read-string

--- src/riemann/query.clj
+++ src/riemann/query.clj
@@ -2,6 +2,7 @@
   "The query parser. Parses strings into ASTs, and converts ASTs to functions
   which match events."
   (:require [clojure.core.cache :as cache]
+            [clojure.edn :as edn]
             [clojure.java.io :as io]
             [clj-antlr.core :as antlr]
             [riemann.common :refer :all]
@@ -97,7 +98,7 @@
     :long       (Long/parseLong (first terms))
     :float      (Double/parseDouble (first terms))
     :bign       (bigint (subs (first terms) 0 (dec (.length (first terms)))))
-    :string     (read-string (first terms))
+    :string     (edn/read-string (first terms))
     :field      (keyword (first terms))
     :true       true
     :false      false


Respect the query in the server-side read for :states

--- src/server/parser.clj
+++ src/server/parser.clj
@@ -7,9 +7,9 @@
 (defmulti mutatef (fn [env key params] key))

 (defmethod readf :states
-  [{:keys [custard]} _ _]
+  [{:keys [custard query]} _ _]
   {:value (into []
-                (map #(select-keys % [:id :title :type]))
+                (map #(select-keys % query))
                 (.states custard))})

 (defmethod readf :project


delete dead code

delete dead code

--- src/sledge/server.clj
+++ src/sledge/server.clj
@@ -11,12 +11,6 @@
             [ring.middleware.resource :as res]
             )
   (:import [org.apache.commons.codec.binary Base64 Hex]))
-
-#_#_
-(defonce enable-brepl (System/getProperty "enable_brepl"))
-(when enable-brepl
-  (require '[simple-brepl.service ])
-  (println "browser repl enabled"))

 (defn base64 [string]
   (Base64/encodeBase64URLSafeString (.getBytes string)))


Tweak semantics of schema search path config.

--- src/sql_file/core.clj
+++ src/sql_file/core.clj
@@ -31,10 +31,10 @@
 (defn- locate-schema-script [ conn basename ]
   (or (some identity
             (map (fn [ prefix ]
-                   (let [ script-path (format "%s%s" prefix basename)]
+                   (let [ script-path (format "%s/%s" prefix basename)]
                      (log/debug "Checking for script:" script-path)
                      (clojure.java.io/resource script-path)))
-                 (conj (get conn :script-prefixes []) "")))
+                 (conj (get conn :schema-path []) ".")))
       (fail "Cannot find resource script: " basename)))

 (defn- schema-install-script [ conn schema ]


make Quicksand power counter addition manual

--- src/clj/game/cards-ice.clj
+++ src/clj/game/cards-ice.clj
@@ -508,9 +508,11 @@
    {:abilities [end-the-run]}

    "Quicksand"
-   {:events {:encounter-ice {:req (req (= (:cid target) (:cid card)))
-                             :effect (effect (add-prop card :counter 1))}}
-    :strength-bonus (req (or (:counter card) 0)) :abilities [end-the-run]}
+   {:abilities [{:req (req (and this-server (= (dec (:position run)) (ice-index state card))))
+                 :label "Add 1 power counter"
+                 :effect (effect (add-prop card :counter 1))}
+                 end-the-run]
+    :strength-bonus (req (or (:counter card) 0))}

    "Rainbow"
    {:abilities [end-the-run]}


issue #5 austin dev only

issue #5 austin dev only

--- src/clj/hit_wl/handler.clj
+++ src/clj/hit_wl/handler.clj
@@ -132,9 +132,9 @@
 (defn init-middleware [handler]
   ;;dummy middleware handler to execute some init logic on app startup
   (db/init (get-db-config))
-  (comment)
-  (when (is-dev?)
-    (init-cljs-repl))
+  (comment
+    (when (is-dev?)
+      (init-cljs-repl)))
   handler)

 (def app


Actually generate popl to pop frame pointer

--- src/clj/minijava/munch.clj
+++ src/clj/minijava/munch.clj
@@ -116,6 +116,7 @@

 (defmethod munchMap [:minijava.ir/Label :minijava.temp/Label]
   [exp lbl]
+  ;; If this is a method label, emit frame pointer init code
   (if (:isMethod lbl)
       (do (emit (LABEL lbl))
           (emit (pushl :EBP))
@@ -315,7 +316,8 @@
   [stm dst]
 	(if (= (:id (:lbl dst)) :done )
 				;;special case: this is actual a return statement.
-	(emit (ret)) ;;GAS ret code.
+        (do (emit (popl :EBP))
+	    (emit (ret))) ;;GAS ret code.
 ;else
   (emit (jmp (munch dst)))))


Send message when enter is pressed

Send message when enter is pressed

--- src/cljs/chatapp/view.cljs
+++ src/cljs/chatapp/view.cljs
@@ -9,30 +9,38 @@
   (let [messages (re-frame/subscribe [:messages])]
     (fn []
       [:div {:class "row"}
-       [:div {:class "col-lg-6"}
+       [:div {:class "col-md-6"}
         [:ul {:class "list-group"}
          (for [m @messages]
            (message m))]]])))

 (defn message-input []
   (let [input (re-frame/subscribe [:message-input])]
-    [:div {:class "row"}
-     [:div {:class "col-lg-6"}
-      [:div {:class "input-group"}
-       [:input {:type        "text"
-                :value       (:text @input)
-                :placeholder "Enter text to reverse!"
-                :class       "form-control"
-                :on-change   #(re-frame/dispatch [:message-input-text (-> % .-target .-value)])}]
-       [:span {:class "input-group-btn"}
-        [:button {:type     "button"
-                  :class    "btn btn-default"
-                  :on-click #(re-frame/dispatch [:send-message])}
-         "Send"]]
-       ]]]))
+    (fn []
+      [:input {:type        "text"
+               :value       (:text @input)
+               :placeholder "Enter text to reverse!"
+               :class       "form-control"
+               :auto-focus  true
+               :on-key-press #(when (= 13 (.-charCode %))
+                                (re-frame/dispatch [:send-message]))
+               :on-change   #(re-frame/dispatch [:message-input-text (-> % .-target .-value)])}])))
+
+(defn message-composer []
+  [:div {:class "row"}
+   [:div {:class "col-md-6"}
+    [:div {:class "input-group"}
+     [message-input]
+     [:span {:class "input-group-btn"}
+      [:button {:type     "button"
+                :class    "btn btn-default"
+                :on-click #(re-frame/dispatch [:send-message])}
+       "Send"]]]]])

 (defn chat-ui []
   [:div {:class "container-fluid"}
-   [:h1 "ChatApp"]
+   [:div {:class "row"}
+    [:div {:class "col-md-6"}
+     [:h1 "ChatApp"]]]
    [message-list]
-   [message-input]])
+   [message-composer]])


quickfix is quick

quickfix is quick

--- src/cljs/re_form/core.cljs
+++ src/cljs/re_form/core.cljs
@@ -193,7 +193,7 @@

       :reagent-render
       (fn [{:keys [on-change form-name path on-blur] :as props}]
-        (let [flags @(rf/subscribe [:re-form/input-flags new-form new-path])
+        (let [flags @(rf/subscribe [:re-form/input-flags form-name path])
               is-form-submitting @(rf/subscribe [:re-form/is-form-submitting form-name])
               errors @(rf/subscribe [:re-form/input-errors form-name path])]
           [:div.re-form-field {:class (->> flags


Added PureCSS responsive grid for items

Added PureCSS responsive grid for items

--- src/cljs/repodoc/core.cljs
+++ src/cljs/repodoc/core.cljs
@@ -39,21 +39,21 @@
 ;; App

 (defn annotate-editor
-  [item index]
+  [index item]
   (nm "span" " editor "))

 (defn annotate-button
-  [item index]
+  [index item]
   (if (= (get item "type") "blob")
     (nm "button.pure-button" {:onclick #(edit item index)} "Annotate")))

 (defn annotate
-  [item index]
+  [index item]
   (let [editor (querydb [:editor])
         editing (get editor index)]
     (if (nil? editing)
-      (annotate-button item index)
-      (annotate-editor item index))))
+      (annotate-button index item)
+      (annotate-editor index item))))

 (defn node
   "Renders one node from tree with indentation"
@@ -62,19 +62,22 @@
         parts (clojure.string/split path "/")
         level (count parts)
         base (last parts)]
-    (nm (str "div.level" level) [base (annotate item index)])))
+    (nm "div.pure-g" [(nm "div.pure-u-1.pure-u-md-1-2" [(nm (str "div.level" level) base)])
+                      (nm "div.pure-u-1.pure-u-md-1-2" [(annotate index item)])])))

 (defn reporender
   "Render repository trees"
   []
-  (map-indexed node (get (querydb [:data]) "tree")))
+  (let [tree (get (querydb [:data]) "tree")]
+    (map-indexed node tree)))
+

 (defn ctrl [])

 (defn viewer
   [ctrl]
   (nm "div" [(nm "h1" "RepoDoc App")
-             (nm "div" (reporender))]))
+             (reporender)]))

 ;; Setup


start of word-map extractor

start of word-map extractor

--- src/cljs/unfolds/core.cljs
+++ src/cljs/unfolds/core.cljs
@@ -4,9 +4,94 @@
             [om.dom :as dom :include-macros true]
             [cljs.core.async :refer [put! chan <!]]))

-(defonce app-state (atom {:text "Hello!"
-                          :items ["foo"
-                                  "Foobar [[foo|blitz]] lolophone hoptigoff."]}))
+(def basic-list
+  "come get give go keep let make put seem take be do have say see
+  send may will about across after against among at before between by
+  down from in off on over through to under up with as for of till
+  than a the all any every little much no other some such that this i
+  he you who and because but or if though while how when where why
+  again ever far forward here near now out still then there together
+  well almost enough even not only quite so very tomorrow yesterday
+  north south east west please yes account act addition adjustment
+  advertisement agreement air amount amusement animal answer apparatus
+  approval argument art attack attempt attention attraction authority
+  back balance base behaviour belief birth bit bite blood blow body
+  brass bread breath brother building burn burst business butter
+  canvas care cause chalk chance change cloth coal colour comfort
+  committee company comparison competition condition connection
+  control cook copper copy cork cotton cough country cover crack
+  credit crime crush cry current curve damage danger daughter day
+  death debt decision degree design desire destruction detail
+  development digestion direction discovery discussion disease disgust
+  distance distribution division doubt drink driving dust earth edge
+  education effect end error event example exchange existence
+  expansion experience expert fact fall family father fear feeling
+  fiction field fight fire flame flight flower fold food force form
+  friend front fruit glass gold government grain grass grip group
+  growth guide harbour harmony hate hearing heat help history hole
+  hope hour humour ice idea impulse increase industry ink insect
+  instrument insurance interest invention iron jelly join journey
+  judge jump kick kiss knowledge land language laugh law lead learning
+  leather letter level lift light limit linen liquid list look loss
+  love machine man manager mark market mass meal measure meat meeting
+  memory metal middle milk mind mine minute mist money month morning
+  mother motion mountain move music name nation need news night noise
+  note number observation offer oil operation opinion order
+  organization ornament owner page pain paint paper part paste payment
+  peace person place plant play pleasure point poison polish porter
+  position powder power price print process produce profit property
+  prose protest pull punishment purpose push quality question rain
+  range rate ray reaction reading reason record regret relation
+  religion representative request respect rest reward rhythm rice
+  river road roll room rub rule run salt sand scale science sea seat
+  secretary selection self sense servant sex shade shake shame shock
+  side sign silk silver sister size sky sleep slip slope smash smell
+  smile smoke sneeze snow soap society son song sort sound soup space
+  stage start statement steam steel step stitch stone stop story
+  stretch structure substance sugar suggestion summer support surprise
+  swim system talk taste tax teaching tendency test theory thing
+  thought thunder time tin top touch trade transport trick trouble
+  turn twist unit use value verse vessel view voice walk war wash
+  waste water wave wax way weather week weight wind wine winter woman
+  wood wool word work wound writing year angle ant apple arch arm army
+  baby bag ball band basin basket bath bed bee bell berry bird blade
+  board boat bone book boot bottle box boy brain brake branch brick
+  bridge brush bucket bulb button cake camera card cart carriage cat
+  chain cheese chest chin church circle clock cloud coat collar comb
+  cord cow cup curtain cushion dog door drain drawer dress drop ear
+  egg engine eye face farm feather finger fish flag floor fly foot
+  fork fowl frame garden girl glove goat gun hair hammer hand hat head
+  heart hook horn horse hospital house island jewel kettle key knee
+  knife knot leaf leg library line lip lock map match monkey moon
+  mouth muscle nail neck needle nerve net nose nut office orange oven
+  parcel pen pencil picture pig pin pipe plane plate plough pocket pot
+  potato prison pump rail rat receipt ring rod roof root sail school
+  scissors screw seed sheep shelf ship shirt shoe skin skirt snake
+  sock spade sponge spoon spring square stamp star station stem stick
+  stocking stomach store street sun table tail thread throat thumb
+  ticket toe tongue tooth town train tray tree trousers umbrella wall
+  watch wheel whip whistle window wing wire worm able acid angry
+  automatic beautiful black boiling bright broken brown cheap chemical
+  chief clean clear common complex conscious cut deep dependent early
+  elastic electric equal fat fertile first fixed flat free frequent
+  full general good great grey hanging happy hard healthy high hollow
+  important kind like living long male married material medical
+  military natural necessary new normal open parallel past physical
+  political poor possible present private probable quick quiet ready
+  red regular responsible right round same second separate serious
+  sharp smooth sticky stiff straight strong sudden sweet tall thick
+  tight tired true violent waiting warm wet wide wise yellow young
+  awake bad bent bitter blue certain cold complete cruel dark dead
+  dear delicate different dirty dry false feeble female foolish future
+  green ill last late left loose loud low mixed narrow old opposite
+  public rough sad safe secret short shut simple slow small soft solid
+  special strange thin white wrong")
+
+(defonce app-state (atom {:items ["foo"
+                                  "Basic English is an English-based controlled language created by linguist and philosopher Charles Kay Ogden as an international auxiliary language, and as an aid for teaching English as a second language. Basic English is, in essence, a simplified subset of regular English. It was presented in Ogden's book Basic English: A General Introduction with Rules and Grammar (1930).
+
+Ogden's Basic, and the concept of a simplified English, gained its greatest publicity just after the Allied victory in World War II as a means for world peace. Although Basic English was not built into a program, similar simplifications have been devised for various international uses. Ogden's associate I. A. Richards promoted its use in schools in China.[1] More recently, it has influenced the creation of Voice of America's Special English for news broadcasting, and Simplified English, another English-based controlled language designed to write technical manuals."
+                                  #_"Foobar [[foo|blitz]] lolophone hoptigoff."]}))

 (defn add-item [app owner]
   (let [new-item (-> (om/get-node owner "new-item")
@@ -34,8 +119,23 @@
     (link (get-href x) (get-title x))
     (str " " x " ")))

-(defn prepare-item [s]
-  (vec (map str-or-link (split-words s))))
+(defn prepare-item [s] (vec (map str-or-link (split-words s))))
+
+;; td-idf, 1-gram
+;; now with basic-list! (or not, does that help here - more like remove those?)
+;; and go to lower-case?
+;; should also have id in it
+#_(defn naive-key-extractor [str]
+    (vec (map first
+              (filter #(= (second %) 1)
+                      (frequencies (split-words str))))))
+
+(defn make-word-map [str id]
+  (zipmap (map first
+               (filter #(= (second %) 1)
+                       (frequencies (split-words str)))) (repeat id)))
+;; then merge
+;; should be elsewhere?

 (defn item-view [item owner]
   (reify
@@ -43,14 +143,16 @@
     (render [this]
       (dom/li nil
               (apply dom/div nil
-                     (prepare-item item))))))
+                     (str item)
+                     (str (naive-key-extractor item) ", ")
+                     #_(prepare-item item))))))

 (defn app-view [app owner]
   (reify
     om/IRenderState
     (render-state [this state]
       (dom/div nil
-               (dom/h1 nil (str (:text app) " " (:count state)))
+               #_(dom/h1 nil (str (:text app) " " (:count state)))
                (dom/textarea #js
                               {:value (:text state)
                                :ref "new-item"


Removed commented out code

Removed commented out code

--- src/cljs/zetawar/subs.cljs
+++ src/cljs/zetawar/subs.cljs
@@ -457,8 +457,6 @@
 (deftrack compatible-armor-types-for-repair? [conn targeted-q targeted-r]
   (when-let [[selected-q selected-r] @(selected-hex conn)]
     (game/compatible-armor-types-for-repair? @conn @(game conn)
-                                             ;(game/unit-at @conn @(game conn) selected-q selected-r)
-                                             ;(game/unit-at @conn @(game conn) targeted-q targeted-r))))
                                              @(unit-at conn selected-q selected-r)
                                              @(unit-at conn targeted-q targeted-r))))


add map-values

add map-values

--- src/clojure/flambo/api.clj
+++ src/clojure/flambo/api.clj
@@ -172,6 +172,11 @@
   [rdd f]
   (.mapToPair rdd (pair-function f)))

+(defn map-values
+  "Apply function `f` over the values of JavaPairRDD `rdd` returning a new JavaPairRDD."
+  [rdd f]
+  (.mapValues rdd (function f)))
+
 (defn reduce
   "Aggregates the elements of `rdd` using the function `f` (which takes two arguments
   and returns one). The function should be commutative and associative so that it can be


demos fix

demos fix

--- src/clojure/nossal/app.clj
+++ src/clojure/nossal/app.clj
@@ -75,7 +75,7 @@
   (POST "/assistant" request
     (assistant request))

-  (POST "/demo" request
+  (GET "/demo" request
     (iframe-demo request))


style - fixed argument alignment in socket case form

--- possibledb/src/possibledb/core.cljs
+++ possibledb/src/possibledb/core.cljs
@@ -347,27 +347,25 @@

                       ;; get the entire database
                       "get" (possibledb-get-db! db
-                                          (fn [db]
-                                            (let [conn @db]
-                                              (write!
-
-                                               ;; remove type for reading
-                                               (zipmap (keys conn) (vals conn))))))
+                                                (fn [db]
+                                                  (let [conn @db]
+                                                    (write!
+
+                                                     ;; remove type for reading
+                                                     (zipmap (keys conn) (vals conn))))))

                       "create!" (possibledb-create-db! db
-                                                 (fn [x]
-                                                   (write! x)))
+                                                       (fn [x]
+                                                         (write! x)))
                       "query" (possibledb-q db
-                                      data
-                                      (fn [result]
-                                        (write! result)))
-
-                      "transact!" (possibledb-transact!
-                                   db
-                                   data
-                                   (fn [result]
-                                     (write! result)))))
-
+                                            data
+                                            (fn [result]
+                                              (write! result)))
+
+                      "transact!" (possibledb-transact! db
+                                                        data
+                                                        (fn [result]
+                                                          (write! result)))))
                   (catch js/Object ex
                     (println ex "input =>" safe)
                     (.end socket))))


fix twitter url

fix twitter url

--- samples/twitterbuzz/src/twitterbuzz/core.cljs
+++ samples/twitterbuzz/src/twitterbuzz/core.cljs
@@ -33,8 +33,7 @@
   [event f]
   (swap! state add-listener event f))

-;; (def twitter-uri (goog.Uri. "http://twitter.com/search.json"))
-(def twitter-uri (goog.Uri. "http://dipert.org/search.json.php"))
+(def twitter-uri (goog.Uri. "http://twitter.com/search.json"))

 (defn search-tag
   "Get the current tag value from the page."


returning old and new index names from update-index so that they can be used for data migration

--- joplin.elasticsearch/src/joplin/elasticsearch/database.clj
+++ joplin.elasticsearch/src/joplin/elasticsearch/database.clj
@@ -131,13 +131,15 @@

 (defn create-index
   "Create an index with the specified options.  Only the alias name is specified, the
-   actual index name is auto-generated to avoid conflicts."
+   actual index name is auto-generated to avoid conflicts. Old and new index names returned
+   so user can perform data migration."
   [alias-name & opts]
   (let [new-index-name (str alias-name "-" (System/currentTimeMillis))
         old-index-name (first (find-index-names alias-name))]
     (apply esi/create (ensure-connected) new-index-name opts)
     (assign-alias alias-name new-index-name old-index-name)
-    (wait-for-ready 1)))
+    (wait-for-ready 1)
+    [old-index-name new-index-name]))

 (defn- deep-merge [& maps]
   (if (every? map? maps)


next iteration

next iteration

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject com.ladderlife/cellophane "0.2.2"
+(defproject com.ladderlife/cellophane "0.2.3-SNAPSHOT"
   :description "Server-side rendering for Om Next components"
   :url "http://github.com/ladderlife/cellophane"
   :license {:name "Eclipse Public License"


Bump to 0.3.2.

Bump to 0.3.2.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject cadence "0.3.2-SNAPSHOT"
+(defproject cadence "0.3.2"
   :description "Use pattern recognition to match users with Cadence.js output."
   :url "https://cadence.herokuapp.com/"
   :min-lein-version "2.0.0"


Begin 0.4.4-SNAPSHOT

Begin 0.4.4-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject org.pinkgorilla/gorilla-notebook "0.4.3"
+(defproject org.pinkgorilla/gorilla-notebook "0.4.4-SNAPSHOT"
   :description "A rich REPL for Clojure in the notebook style."
   :url "https://github.com/pink-gorilla/gorilla-notebook"
   :scm {:name "git" :url "https://github.com/pink-gorilla/gorilla-notebook"}


Upgrade to 0.10.0-beta13.

Upgrade to 0.10.0-beta13.

--- project.clj
+++ project.clj
@@ -1,9 +1,9 @@
-(defproject workshop "0.10.0-beta12"
+(defproject workshop "0.10.0-beta13"
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :dependencies [[org.clojure/clojure "1.8.0"]
                  ^{:voom {:repo "git@github.com:onyx-platform/onyx.git" :branch "master"}}
-                 [org.onyxplatform/onyx "0.10.0-beta12"]
+                 [org.onyxplatform/onyx "0.10.0-beta13"]
                  [org.slf4j/slf4j-api "1.7.12"]
                  [org.slf4j/slf4j-nop "1.7.12"]]
   :profiles {:dev {:dependencies [[org.clojure/tools.namespace "0.2.10"]


0.8.11-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject expound "0.8.10"
+(defproject expound "0.8.11-SNAPSHOT"
   :description "Human-optimized error messages for clojure.spec"
   :url "https://github.com/bhb/expound"
   :license {:name "Eclipse Public License"


Preparing for release 0.2.9

Preparing for release 0.2.9

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject se.haleby/stub-http "0.2.9-SNAPSHOT"
+(defproject se.haleby/stub-http "0.2.9"
   :description "A client library agonistic way to stub HTTP responses"
   :url "https://github.com/johanhaleby/stub-http"
   :license {:name         "MIT License"


CMR-5355: Bumped up the version to 0.2.4-SNAPSHOT

--- project.clj
+++ project.clj
@@ -15,7 +15,7 @@
        ns
        "\u001B[35m]\u001B[33m λ\u001B[m=> "))

-(defproject gov.nasa.earthdata/cmr-sizing-plugin "0.2.3-SNAPSHOT"
+(defproject gov.nasa.earthdata/cmr-sizing-plugin "0.2.4-SNAPSHOT"
   :description "A size estimation service for subsetted GIS data"
   :url "https://github.com/cmr-exchange/cmr-sizing-plugin"
   :license {


Move Clojure to dev dependency

Move Clojure to dev dependency

--- project.clj
+++ project.clj
@@ -22,5 +22,5 @@
   :source-paths ["src/clj"]
   :java-source-paths ["src/java"]
   :pedantic? :warn
-  :dependencies [[org.clojure/clojure "1.6.0"]]
+  :profiles {:dev {:dependencies [[org.clojure/clojure "1.7.0"]]}}
   :plugins [[jonase/eastwood "0.2.1"]])


Version 0.3.2

Version 0.3.2

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject clojure.java-time "0.3.2-SNAPSHOT"
+(defproject clojure.java-time "0.3.2"
   :description "Clojure wrapper for Java 8 Time API"
   :url "http://github.com/dm3/clojure.java-time"
   :license {:name "MIT License"


bumped up version

bumped up version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject selmer "1.12.17"
+(defproject selmer "1.12.18"
   :description "Django style templates for Clojure"
   :url "https://github.com/yogthos/Selmer"
   :license {:name "Eclipse Public License"


Version bump.

Version bump.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject lspector/clojush "1.3.7"
+(defproject lspector/clojush "1.3.8"
             :description "The Push programming language and the PushGP genetic programming
                           system implemented in Clojure.
                           See http://hampshire.edu/lspector/push.html"


upgrade 'rewrite-clj' dependency. (closes #48).

--- project.clj
+++ project.clj
@@ -1,7 +1,7 @@
 (defproject lein-ancient "0.6.3-SNAPSHOT"
   :description "Check your Projects for outdated Dependencies."
   :url "https://github.com/xsc/lein-ancient"
-  :dependencies [[rewrite-clj "0.4.11"]
+  :dependencies [[rewrite-clj "0.4.12"]
                  [ancient-clj "0.3.1"]
                  [version-clj "0.1.2"]
                  [jansi-clj "0.1.0"]


release 0.2.8

release 0.2.8

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject wma-clj/lein-template "0.2.8-SNAPSHOT"
+(defproject wma-clj/lein-template "0.2.8"
   :description "FIXME: write description"
   :url "http://example.com/FIXME"
   :license {:name "Eclipse Public License"


Add test.check dependency and upgrade buddy-core dependency.

--- project.clj
+++ project.clj
@@ -5,7 +5,8 @@
             :url "http://www.apache.org/licenses/LICENSE-2.0"}
   :dependencies [[org.clojure/clojure "1.8.0" :scope "provided"]
                  [com.taoensso/nippy "2.11.1" :scope "provided"]
-                 [buddy/buddy-core "0.12.1"]
+                 [org.clojure/test.check "0.9.0" :scope "test"]
+                 [buddy/buddy-core "0.13.0"]
                  [cheshire "5.6.1"]]
   :source-paths ["src"]
   :javac-options ["-target" "1.7" "-source" "1.7" "-Xlint:-options"]


project.clj fix

project.clj fix

--- project.clj
+++ project.clj
@@ -12,6 +12,7 @@
                  [org.clojure/core.async "0.1.346.0-17112a-alpha"]]
   :javac-options ["-source" "1.6" "-target" "1.6" "-g"]
   :java-source-paths ["java"]
+  :deploy-repositories [["releases" :clojars]]
   :profiles {:dev {:dependencies [[org.slf4j/slf4j-api "1.7.7"]
                                   [ch.qos.logback/logback-classic "1.1.2"]
                                   [org.postgresql/postgresql "9.3-1102-jdbc41"]]}})


Version 0.4.11-SNAPSHOT

Version 0.4.11-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject kixi/terraboot "0.4.10"
+(defproject kixi/terraboot "0.4.11-SNAPSHOT"
   :description "Terraform modules for kixi framework"
   :url "http://example.com/FIXME"
   :license {:name "Eclipse Public License"


Update clojure deps

Update clojure deps

--- project.clj
+++ project.clj
@@ -7,9 +7,9 @@
   :source-paths ["src/main/clojure"]
   :test-paths ["src/test/clojure"]
   :jvm-opts ^:replace ["-Xmx512m" "-server"]
-  :profiles {:dev {:dependencies [[org.clojure/clojure "1.9.0"]
+  :profiles {:dev {:dependencies [[org.clojure/clojure "1.10.1"]
                                   [org.clojure/clojurescript "1.10.520"]]}
-             :self-host {:dependencies [[org.clojure/clojure "1.9.0"]
+             :self-host {:dependencies [[org.clojure/clojure "1.10.1"]
                                         [org.clojure/clojurescript "1.10.520"]]
                          :main clojure.main
                          :global-vars {*warn-on-reflection* false}}}


Set Javac target to 1.6

Set Javac target to 1.6

Change #99 introduced a Java class which is compiled ahead of time to
the JAR. By default the Java classes are built for use in current Java
version and to allow use in older Java versions an option has to be
provided.

--- project.clj
+++ project.clj
@@ -38,4 +38,5 @@
 ;;             "-XX:+PrintCompilation"
 ;;             "-XX:+UnlockDiagnosticVMOptions"
 ;;             "-XX:+PrintInlining"
-             ])
+             ]
+  :javac-options ["-target" "1.6" "-source" "1.6" "-Xlint:-options"])


Version 1.5.6-SNAPSHOT

Version 1.5.6-SNAPSHOT

--- project.clj
+++ project.clj
@@ -2,7 +2,7 @@
 (def ks-version "1.3.0")
 (def jetty-version "9.2.10.v20150310")

-(defproject puppetlabs/trapperkeeper-webserver-jetty9 "1.5.5"
+(defproject puppetlabs/trapperkeeper-webserver-jetty9 "1.5.6-SNAPSHOT"
   :description "A jetty9-based webserver implementation for use with the puppetlabs/trapperkeeper service framework."
   :url "https://github.com/puppetlabs/trapperkeeper-webserver-jetty9"
   :license {:name "Apache License, Version 2.0"


bumped buddy to version 0.7.0 to fix problem with uncaught exception bumped reagent-forms version

--- project.clj
+++ project.clj
@@ -23,7 +23,7 @@
                  [org.clojure/tools.nrepl "0.2.11"]
                  [org.webjars/bootstrap "3.3.5"]
                  [org.webjars/jquery "2.1.4"]
-                 [buddy "0.6.2"]
+                 [buddy "0.7.0"]
                  [migratus "0.8.4"]
                  [clj-time "0.11.0"]
                  [conman "0.1.9"]
@@ -31,7 +31,7 @@
                  [org.clojure/clojurescript "1.7.122" :scope "provided"]
                  [org.clojure/tools.reader "0.9.2"]
                  [reagent "0.5.1"]
-                 [reagent-forms "0.5.10"]
+                 [reagent-forms "0.5.11"]
                  [reagent-utils "0.1.5"]
                  [secretary "1.2.3"]
                  [org.clojure/core.async "0.1.346.0-17112a-alpha"]


Reformat project.clj

Reformat project.clj

--- project.clj
+++ project.clj
@@ -1,7 +1,7 @@
-(defproject day8.re-frame/async-flow-fx "see :git-version below https://github.com/arrdem/lein-git-version"
+(defproject    day8.re-frame/async-flow-fx "see :git-version below https://github.com/arrdem/lein-git-version"
   :description "A re-frame effects handler for coordinating the kind of async control flow which often happens on app startup."
-  :url "https://github.com/day8/re-frame-async-flow-fx.git"
-  :license {:name "MIT"}
+  :url         "https://github.com/day8/re-frame-async-flow-fx.git"
+  :license     {:name "MIT"}

   :git-version
   {:status-to-version
@@ -15,23 +15,23 @@
              patch+           (inc patch)]
          (format "%s.%d-%s-SNAPSHOT" prefix patch+ ahead))))}

-  :dependencies [[org.clojure/clojure "1.10.1" :scope "provided"]
-                 [org.clojure/clojurescript "1.10.520" :scope "provided"
+  :dependencies [[org.clojure/clojure             "1.10.1" :scope "provided"]
+                 [org.clojure/clojurescript       "1.10.520" :scope "provided"
                   :exclusions [com.google.javascript/closure-compiler-unshaded
                                org.clojure/google-closure-library]]
-                 [thheller/shadow-cljs "2.8.69" :scope "provided"]
-                 [re-frame "0.10.9" :scope "provided"]
+                 [thheller/shadow-cljs            "2.8.69" :scope "provided"]
+                 [re-frame                        "0.10.9" :scope "provided"]
                  [day8.re-frame/forward-events-fx "0.0.6"]]

   :plugins [[me.arrdem/lein-git-version "2.0.3"]
-            [lein-shadow "0.1.5"]]
+            [lein-shadow                "0.1.5"]]

   :profiles {:debug {:debug true}
-             :dev   {:dependencies [[karma-reporter "3.1.0"]
+             :dev   {:dependencies [[karma-reporter     "3.1.0"]
                                     [day8.re-frame/test "0.1.5"]
                                     [binaryage/devtools "0.9.10"]]
                      :plugins      [[lein-ancient "0.6.15"]
-                                    [lein-shell "0.5.0"]]}}
+                                    [lein-shell   "0.5.0"]]}}

   :clean-targets [:target-path
                   "resources/public/js/test"


Prepare for next release cycle.

Prepare for next release cycle.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject org.onyxplatform/onyx-sql "0.7.11"
+(defproject org.onyxplatform/onyx-sql "0.7.12-SNAPSHOT"
   :description "Onyx plugin for JDBC-backed SQL databases"
   :url "https://github.com/MichaelDrogalis/onyx-sql"
   :license {:name "Eclipse Public License"


latest dependencies

latest dependencies

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject matthiasn/systems-toolbox-sente "0.5.15"
+(defproject matthiasn/systems-toolbox-sente "0.5.16"
   :description "WebSocket components for systems-toolbox"
   :url "https://github.com/matthiasn/systems-toolbox"
   :license {:name "Eclipse Public License"
@@ -8,7 +8,7 @@

   :dependencies [[org.clojure/clojure "1.8.0"]
                  [org.clojure/tools.reader "1.0.0-beta1"]
-                 [org.clojure/clojurescript "1.8.40"]
+                 [org.clojure/clojurescript "1.8.51"]
                  [org.ow2.asm/asm-all "5.1"]
                  [org.clojure/core.async "0.2.374" :exclusions [org.clojure/tools.reader]]
                  [org.clojure/tools.logging "0.3.1"]
@@ -27,5 +27,5 @@
                                                         org.jboss.logging/jboss-logging
                                                         org.jboss.xnio/xnio-nio org.slf4j/slf4j-api]]]

-  :plugins [[lein-codox "0.9.4" :exclusions [org.clojure/clojure]]
+  :plugins [[lein-codox "0.9.5" :exclusions [org.clojure/clojure]]
             [lein-cljsbuild "1.1.3"]])


Version 50

Version 50

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject clojars-web "50-SNAPSHOT"
+(defproject clojars-web "50"
   :min-lein-version "2.0.0"
   :dependencies [[org.clojure/clojure "1.8.0"]
                  [org.clojure/tools.cli "0.2.1"]


version

version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject de.sveri/friendui "0.2.0"
+(defproject de.sveri/friendui "0.2.1"
   :description "A frontend for friend library using selmer and storing data in datomic"
   :url "https://github.com/sveri/friend-ui/"
   :license {:name "Eclipse Public License"


Moving semantic-csv requirement back to standard release from git release

--- project.clj
+++ project.clj
@@ -2,7 +2,6 @@
   :source-paths ["src/"
                  "src/polismath/"
                  ".lein-git-deps/debug-repl/src/"
-                 ".lein-git-deps/semantic-csv/src/"
                  ".lein-git-deps/tools.cli/src/main/clojure/"]
   ;:aot :all
   ; faster run time in exchange for slower startup time
@@ -14,7 +13,6 @@
             [lein-gorilla "0.3.4"]
             [lein-environ "0.4.0"]]
   :git-dependencies [["https://github.com/Prismatic/hiphip.git" "master"]
-                     ["https://github.com/metasoarous/semantic-csv.git" "master"]
                      ["https://github.com/metasoarous/tools.cli.git" "master"]
                      ["https://github.com/GeorgeJahad/debug-repl.git" "master"]]
   :dependencies [[commons-collections/commons-collections "3.2.1"]
@@ -50,7 +48,7 @@
   :min-lein-version "2.3.0"
   :profiles {
     :dev {
-      ;:dependencies [[semantic-csv "0.1.0-alpha3"]]
+      :dependencies [[semantic-csv "0.1.0-alpha3"]]
       :env {
         :mongo-url "db/mongo.db"}}
     :production {


Whitespace

Whitespace

--- project.clj
+++ project.clj
@@ -3,6 +3,6 @@
   :url "https://github.com/bensu/cljs-test-template"
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
-  :scm { :name "git"
-         :url "https://github.com/bensu/cljs-test-template"}
+  :scm {:name "git"
+        :url "https://github.com/bensu/cljs-test-template"}
   :eval-in-leiningen true)


Updated version for next release cycle

Updated version for next release cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject com.palletops/multi-test "0.1.0"
+(defproject com.palletops/multi-test "0.1.1-SNAPSHOT"
   :description "An alternative runner for clojure.test tests"
   :url "http://palletops.com/multi-test"
   :license {:name "Eclipse Public License"


update project.clj

update project.clj

I forgot to update the name and the current version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject editor "0.2.5-SNAPSHOT"
+(defproject frehley "0.2.6-SNAPSHOT"
   :description "A rudimentary editor that uses the Ace editor control"
   :url "http://github.com/frankhale/editor"
   :license {:name "Eclipse Public License"


(maint) Update ps-version to 2.6.2-SNAPSHOT in project.clj

--- project.clj
+++ project.clj
@@ -2,7 +2,7 @@
 (def tk-version "1.5.0")
 (def tk-jetty-version "1.5.10")
 (def ks-version "1.3.1")
-(def ps-version "2.6.1")
+(def ps-version "2.6.2-SNAPSHOT")

 (defn deploy-info
   [url]


Updated swank dependency to swank-clojure 1.2.0

--- project.clj
+++ project.clj
@@ -6,5 +6,5 @@
                  [clout "0.2.0"]
                  [ring/ring-core "0.2.2"]]
   :dev-dependencies [[lein-clojars "0.5.0"]
-                     [leiningen/lein-swank "1.1.0"]
+                     [swank-clojure "1.2.0"]
                      [ring/ring-jetty-adapter "0.2.0"]])


bumpin them deps

bumpin them deps

--- project.clj
+++ project.clj
@@ -20,26 +20,28 @@
                  [ring/ring-devel "1.3.2"]
                  [ring-partial-content "1.0.0"]
                  [compojure "1.3.3"]
-                 [org.clojure/clojurescript "0.0-3169"]
+                 [org.clojure/clojurescript "0.0-3208"]
                  [org.clojure/java.jdbc "0.3.6"]
                  [org.xerial/sqlite-jdbc "3.8.7"]
                  [org/jaudiotagger "2.0.3"]
                  [claudio "0.1.2"]
-                 [com.novemberain/pantomime "2.4.0"]
+                 [com.novemberain/pantomime "2.5.0"]
                  [org.clojure/tools.logging "0.3.1"]
                  [secretary "1.2.3"]
-                 [cljs-ajax "0.3.10"]
+                 [cljs-ajax "0.3.11"]
                  [org.omcljs/om "0.8.8"]
                  [bk/ring-gzip "0.1.1"]
                  [sablono "0.3.4"]
                  [org.clojure/core.async "0.1.346.0-17112a-alpha"]
                  [clj-http "1.1.0"]
                  [digest "1.4.4"]
-                 [figwheel "0.2.5"]
+                 [figwheel "0.2.6"]
                  [environ "1.0.0"]
                  [enlive "1.1.5"]
                  [clj-time "0.9.0"]
-                 [com.andrewmcveigh/cljs-time "0.3.3"]]
+                 [com.andrewmcveigh/cljs-time "0.3.3"]
+                 [org.clojure/tools.reader "0.9.1"] ;;temporary
+                 ]
   :source-paths ~src-paths
   :plugins [[lein-ring "0.8.13"]
             [lein-cljsbuild "1.0.4"]


latest deps

latest deps

--- project.clj
+++ project.clj
@@ -4,17 +4,17 @@
   :license {:name "GNU AFFERO GENERAL PUBLIC LICENSE"
             :url  "https://www.gnu.org/licenses/agpl-3.0.en.html"}
   :dependencies [[org.clojure/clojure "1.9.0-alpha14"]
-                 [org.clojure/clojurescript "1.9.293"]
+                 [org.clojure/clojurescript "1.9.456"]
                  [org.clojure/tools.logging "0.3.1"]
                  [org.clojure/tools.namespace "0.3.0-alpha3"]
                  [com.taoensso/encore "2.88.2"]
-                 [ch.qos.logback/logback-classic "1.1.9"]
+                 [ch.qos.logback/logback-classic "1.1.10"]
                  [hiccup "1.0.5"]
                  [clj-pid "0.1.2"]
                  [clj-time "0.13.0"]
                  [clj-http "3.4.1"]
                  [me.raynes/fs "1.4.6"]
-                 [markdown-clj "0.9.92"]
+                 [markdown-clj "0.9.94"]
                  [cheshire "5.7.0"]
                  [cljsjs/moment "2.17.1-0"]
                  [cljsjs/react-grid-layout "0.13.7-0"]
@@ -50,7 +50,7 @@

   :plugins [[lein-cljsbuild "1.1.5"
              :exclusions [org.apache.commons/commons-compress]]
-            [lein-figwheel "0.5.8"]
+            [lein-figwheel "0.5.9"]
             [lein-sassy "1.0.8"
              :exclusions [org.clojure/clojure org.codehaus.plexus/plexus-utils]]
             [com.jakemccrary/lein-test-refresh "0.18.1"]


Bump version to 0.11.0-SNAPSHOT to prep rollback.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject grafter/grafter "0.9.0"
+(defproject grafter/grafter "0.11.0-SNAPSHOT"
   :description "Tools for the hard graft of linked data processing"
   :url "http://grafter.org/"
   :license {:name "Eclipse Public License - v1.0"
@@ -6,7 +6,7 @@

   :deploy-repositories [["releases" :clojars]]

-  :dependencies [[org.clojure/clojure "1.9.0-alpha14"]
+  :dependencies [[org.clojure/clojure "1.9.0-RC1"]
                  [org.openrdf.sesame/sesame-runtime "2.8.9"]
                  [org.clojure/tools.logging "0.3.1"]
                  [grafter/url "0.2.5"]
@@ -35,7 +35,7 @@

   :pedantic? true

-  :profiles {:clj-19 { :dependencies [[org.clojure/clojure "1.9.0-alpha14"]] }
+  :profiles {

              :dev {:plugins [[codox "0.8.10"]]


stable version (13) for geotools

stable version (13) for geotools

--- project.clj
+++ project.clj
@@ -4,9 +4,7 @@
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :repositories [["osgeo" {:url "http://download.osgeo.org/webdav/geotools/"
-                           :snapshots false}]
-                 ["boundless" {:url "http://repo.boundlessgeo.com/main"
-                              :snapshots true}]]
+                           :snapshots false}]]
   :dependencies [[org.clojure/clojure "1.7.0-alpha5"]
                  [org.clojure/tools.trace "0.7.8"]
                  [org.clojure/core.async "0.1.346.0-17112a-alpha"]
@@ -19,9 +17,9 @@
                  [org.clojure/java.jdbc "0.3.6"]
                  [postgresql "9.3-1102.jdbc41"]
                  [com.cognitect/transit-clj "0.8.269"]
-                 [org.geotools/gt-xml "14-SNAPSHOT"]
-                 [org.geotools/gt-epsg-extension "14-SNAPSHOT"]
-                 [org.geotools/gt-shapefile "14-SNAPSHOT"]
+                 [org.geotools/gt-xml "13.0"]
+                 [org.geotools/gt-epsg-extension "13.0"]
+                 [org.geotools/gt-shapefile "13.0"]
                  [org.codehaus.woodstox/woodstox-core-asl "4.4.1"]]
   :plugins [[lein-environ "1.0.0"]]
   :main ^:skip-aot pdok.featured.core


Up CLJS

Up CLJS

--- project.clj
+++ project.clj
@@ -3,7 +3,7 @@
   :url "https://toblux.github.io/visibility-2d/"

   :dependencies [[org.clojure/clojure "1.6.0"]
-                 [org.clojure/clojurescript "0.0-3211"]]
+                 [org.clojure/clojurescript "0.0-3297"]]

   :plugins [[lein-cljsbuild "1.0.6"]]


Updated tools.logging to 1.2.1 and slf4j to 1.17.32

Signed-off-by: James Turnbull <474ba67bdb289c6263b36dfd8a7bed6c85b04943@lovedthanlost.net>

--- project.clj
+++ project.clj
@@ -11,12 +11,12 @@
     [org.clojure/algo.generic "0.1.2"]
     [org.clojure/clojure "1.9.0"]
     [org.clojure/math.numeric-tower "0.0.4"]
-    [org.clojure/tools.logging "0.4.0"]
+    [org.clojure/tools.logging "1.2.1"]
     [org.clojure/tools.nrepl "0.2.13"]
     [org.clojure/core.cache "0.6.5"]
     [org.clojure/data.priority-map "0.0.10"]
     [org.clojure/java.classpath "0.3.0"]
-    [org.slf4j/log4j-over-slf4j "1.7.25"]
+    [org.slf4j/log4j-over-slf4j "1.7.32"]
     [javax.xml.bind/jaxb-api "2.4.0-b180830.0359"]
     [ch.qos.logback/logback-classic "1.2.3"]
     [com.github.juise/logstash-logback-layout "1.0"]


Update libraries

Update libraries

--- project.clj
+++ project.clj
@@ -3,13 +3,13 @@
   :url "https://github.com/oakes/Nightcode"
   :license {:name "Public Domain"
             :url "http://unlicense.org/UNLICENSE"}
-  :dependencies [[com.fifesoft/autocomplete "2.5.7"]
-                 [com.fifesoft/rsyntaxtextarea "2.5.7"]
+  :dependencies [[com.fifesoft/autocomplete "2.5.8"]
+                 [com.fifesoft/rsyntaxtextarea "2.5.8"]
                  [com.github.insubstantial/substance "7.3"]
-                 [compliment "0.2.4"]
+                 [compliment "0.2.5"]
                  [gwt-plugin "0.1.6"]
                  [hiccup "1.0.5"]
-                 [leiningen "2.5.1"
+                 [leiningen "2.5.3"
                   :exclusions [leiningen.search]]
                  [lein-ancient "0.5.4"
                   :exclusions [clj-aws-s3]]
@@ -24,7 +24,7 @@
                  [net.java.balloontip/balloontip "1.2.4.1"]
                  [org.clojure/clojure "1.7.0"]
                  [org.clojure/core.incubator "0.1.3"]
-                 [org.clojure/tools.cli "0.3.1"]
+                 [org.clojure/tools.cli "0.3.3"]
                  [org.clojure/tools.namespace "0.2.10"]
                  [org.eclipse.jgit "3.5.3.201412180710-r"
                   :exclusions [org.apache.httpcomponents/httpclient]]


clojurescript 1.9.542

clojurescript 1.9.542

--- project.clj
+++ project.clj
@@ -7,7 +7,7 @@
   :min-lein-version "2.7.1"

   :dependencies [[org.clojure/clojure "1.9.0-alpha15"]
-                 [org.clojure/clojurescript "1.9.521"]
+                 [org.clojure/clojurescript "1.9.542"]
                  [org.clojure/core.async "0.3.442"
                   :exclusions [org.clojure/tools.reader]]
                  [reagent "0.6.1"]]


(maint) Introduce lein-parent and clj-parent

--- project.clj
+++ project.clj
@@ -10,16 +10,20 @@

   :description "SSL certificate management on the JVM."

+  :min-lein-version "2.7.1"
+
+  :parent-project {:coords [puppetlabs/clj-parent "0.2.5"]
+                   :inherit [:managed-dependencies]}
+
   ;; Abort when version ranges or version conflicts are detected in
   ;; dependencies. Also supports :warn to simply emit warnings.
-  ;; requires lein 2.2.0+.
   :pedantic? :abort

-  :dependencies [[org.clojure/tools.logging "0.2.6" :exclusions [org.clojure/clojure]]
+  :dependencies [[org.clojure/tools.logging]
                  [org.bouncycastle/bcpkix-jdk15on "1.55"]
-                 [commons-codec "1.9"]
-                 [clj-time "0.7.0"]
-                 [puppetlabs/i18n "0.4.3"]]
+                 [commons-codec]
+                 [clj-time]
+                 [puppetlabs/i18n]]

   :source-paths ["src/clojure"]
   :java-source-paths ["src/java"]
@@ -30,14 +34,15 @@
   ;; depend on this source jar using a :classifier in their :dependencies.
   :classifiers [["sources" :sources-jar]]

-  :profiles {:dev {:dependencies [[org.clojure/clojure "1.6.0"]]
+  :profiles {:dev {:dependencies [[org.clojure/clojure]]
                    :resource-paths ["test-resources"]}

              :sources-jar {:java-source-paths ^:replace []
                            :jar-exclusions ^:replace []
                            :source-paths ^:replace ["src/clojure" "src/java"]}}

-  :plugins [[puppetlabs/i18n "0.4.3"]]
+  :plugins [[lein-parent "0.3.1"]
+            [puppetlabs/i18n "0.4.3"]]
   :lein-release {:scm         :git
                  :deploy-via  :lein-deploy}
   :deploy-repositories [["releases" ~(deploy-info "https://clojars.org/repo")]


Version 5.3.9

Version 5.3.9

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(def ps-version "5.3.9-SNAPSHOT")
+(def ps-version "5.3.9")
 (def jruby-1_7-version "1.7.27-1")
 (def jruby-9k-version "9.1.16.0-1")


Use Logback, avoid warning about missing logger implementation

--- project.clj
+++ project.clj
@@ -7,6 +7,7 @@
   :dependencies [[org.clojure/clojure "1.4.0"]
                  [org.clojure/tools.cli "0.2.2"]
                  [http.async.client "0.5.0-SNAPSHOT"]
+                 [ch.qos.logback/logback-classic "1.0.7"]
                  [ring/ring-core "1.1.6"]
                  [ring/ring-devel "1.1.6"]
                  [ring/ring-jetty-adapter "1.1.6"]


bump dependencies

bump dependencies

--- project.clj
+++ project.clj
@@ -12,9 +12,9 @@
                  [org.clojure/core.logic "0.8.10"]
                  [org.clojure/core.match "0.3.0-alpha4"]              ; optimized pattern matching library for Clojure
                  [org.clojure/core.memoize "0.5.7"]                   ; needed by core.match; has useful FIFO, LRU, etc. caching mechanisms
-                 [org.clojure/data.csv "0.1.2"]                       ; CSV parsing / generation
+                 [org.clojure/data.csv "0.1.3"]                       ; CSV parsing / generation
                  [org.clojure/java.classpath "0.2.2"]
-                 [org.clojure/java.jdbc "0.4.1"]                      ; basic jdbc access from clojure
+                 [org.clojure/java.jdbc "0.4.2"]                      ; basic jdbc access from clojure
                  [org.clojure/math.numeric-tower "0.0.4"]             ; math functions like `ceil`
                  [org.clojure/tools.logging "0.3.1"]                  ; logging framework
                  [org.clojure/tools.macro "0.1.5"]                    ; tools for writing macros
@@ -22,17 +22,17 @@
                  [org.clojure/tools.reader "0.9.2"]                   ; Need to explictly specify this dep otherwise expectations doesn't seem to work right :'(
                  [amalloy/ring-gzip-middleware "0.1.3"]               ; Ring middleware to GZIP responses if client can handle it
                  [cheshire "5.5.0"]                                   ; fast JSON encoding (used by Ring JSON middleware)
-                 [clj-http-lite "0.2.1"]                              ; HTTP client; lightweight version of clj-http that uses HttpURLConnection instead of Apache
-                 [clj-time "0.10.0"]                                  ; library for dealing with date/time
+                 [clj-http-lite "0.3.0"]                              ; HTTP client; lightweight version of clj-http that uses HttpURLConnection instead of Apache
+                 [clj-time "0.11.0"]                                  ; library for dealing with date/time
                  [clojurewerkz/quartzite "2.0.0"]                     ; scheduling library
                  [colorize "0.1.1" :exclusions [org.clojure/clojure]] ; string output with ANSI color codes (for logging)
                  [com.cemerick/friend "0.2.1"]                        ; auth library
-                 [com.draines/postal "1.11.3"]                        ; SMTP library
-                 [com.h2database/h2 "1.4.187"]                        ; embedded SQL database
+                 [com.draines/postal "1.11.4"]                        ; SMTP library
+                 [com.h2database/h2 "1.4.189"]                        ; embedded SQL database
                  [com.mattbertolini/liquibase-slf4j "1.2.1"]          ; Java Migrations lib
-                 [com.novemberain/monger "3.0.0"]                     ; MongoDB Driver
+                 [com.novemberain/monger "3.0.1"]                     ; MongoDB Driver
                  [compojure "1.4.0"]                                  ; HTTP Routing library built on Ring
-                 [environ "1.0.0"]                                    ; easy environment management
+                 [environ "1.0.1"]                                    ; easy environment management
                  [hiccup "1.0.5"]                                     ; HTML templating
                  [korma "0.4.2"]                                      ; SQL lib
                  [log4j/log4j "1.2.17"
@@ -42,13 +42,13 @@
                                com.sun.jmx/jmxri]]
                  [medley "0.7.0"]                                     ; lightweight lib of useful functions
                  [mysql/mysql-connector-java "5.1.36"]                ; MySQL JDBC driver
-                 [org.liquibase/liquibase-core "3.4.0"]               ; migration management (Java lib)
+                 [org.liquibase/liquibase-core "3.4.1"]               ; migration management (Java lib)
                  [org.slf4j/slf4j-log4j12 "1.7.12"]
-                 [org.yaml/snakeyaml "1.15"]                          ; YAML parser (required by liquibase)
+                 [org.yaml/snakeyaml "1.16"]                          ; YAML parser (required by liquibase)
                  [postgresql "9.3-1102.jdbc41"]                       ; Postgres driver
                  [ring/ring-jetty-adapter "1.4.0"]                    ; Ring adapter using Jetty webserver (used to run a Ring server for unit tests)
-                 [ring/ring-json "0.3.1"]                             ; Ring middleware for reading/writing JSON automatically
-                 [stencil "0.4.0"]                                    ; Mustache templates for Clojure
+                 [ring/ring-json "0.4.0"]                             ; Ring middleware for reading/writing JSON automatically
+                 [stencil "0.5.0"]                                    ; Mustache templates for Clojure
                  [swiss-arrows "1.0.0"]]                              ; 'Magic wand' macro -<>, etc.
   :plugins [[lein-environ "1.0.0"]                                    ; easy access to environment variables
             [lein-ring "0.9.3"]]                                      ; start the HTTP server with 'lein ring server'
@@ -66,10 +66,10 @@
              :exclude-linters [:constant-test                         ; korma macros generate some forms with if statements that are always logically true or false
                                :suspicious-expression                 ; core.match macros generate some forms like (and expr) which is "suspicious"
                                :unused-ret-vals]}                     ; gives too many false positives for functions with side-effects like conj!
-  :profiles {:dev {:dependencies [[org.clojure/tools.nrepl "0.2.10"]  ; REPL <3
-                                  [expectations "2.1.2"]              ; unit tests
+  :profiles {:dev {:dependencies [[org.clojure/tools.nrepl "0.2.11"]  ; REPL <3
+                                  [expectations "2.1.3"]              ; unit tests
                                   [marginalia "0.8.0"]                ; for documentation
-                                  [ring/ring-mock "0.2.0"]]
+                                  [ring/ring-mock "0.3.0"]]
                    :plugins [[cider/cider-nrepl "0.10.0-SNAPSHOT"]    ; Interactive development w/ cider NREPL in Emacs
                              [jonase/eastwood "0.2.1"]                ; Linting
                              [lein-ancient "0.6.7"]                   ; Check project for outdated dependencies + plugins w/ 'lein ancient'
@@ -98,7 +98,7 @@
                                        "-Xverify:none"]}              ; disable bytecode verification when running tests so they start slightly faster
              :uberjar {:aot :all}
              :generate-sample-dataset {:dependencies [[faker "0.2.2"]                   ; Fake data generator -- port of Perl/Ruby
-                                                      [incanter/incanter-core "1.5.6"]] ; Satistical functions like normal distibutions}})
+                                                      [incanter/incanter-core "1.9.0"]] ; Satistical functions like normal distibutions}})
                                        :source-paths ["sample_dataset"]
                                        :global-vars {*warn-on-reflection* false}
                                        :main ^:skip-aot metabase.sample-dataset.generate}})


Restoring repl profile to run tests from the repl

--- project.clj
+++ project.clj
@@ -8,14 +8,17 @@
                  [org.clojure/core.async "0.1.346.0-17112a-alpha"]]
   :plugins [[lein-cljsbuild "1.0.5"]
             [com.cemerick/clojurescript.test "0.3.3"]]
-  :aliases {"cljs-test" ["cljsbuild" "test"]
+  :aliases {"repl" ["with-profile" "repl" "repl"]
+            "cljs-test" ["cljsbuild" "test"]
             "cljs-autotest" ["cljsbuild" "auto" "test"]
             "all-tests" ["do" "clean" ["test"] ["cljs-test"]]}
   :profiles {:dev {:dependencies [[org.clojure/tools.namespace "0.2.10"]
                                   [org.clojure/tools.nrepl "0.2.10"]
                                   [com.cemerick/piggieback "0.2.0"]
                                   [net.cgrand/parsley "0.9.3" :exclusions [org.clojure/clojure]]]
-                   :source-paths ["src"]}}
+                   :source-paths ["src" "test"]}
+             :repl [:dev {:source-paths ["src" "test" "repl"]
+                          :test-paths ["test"]}]}
   :prep-tasks ["javac" "compile"]
   :cljsbuild {:test-commands {"phantom" ["phantomjs" :runner "target/testable.js"]
                               "node" ["node" :node-runner "target/testable.js"]}


Updated to use the latest release of http-kit.

--- project.clj
+++ project.clj
@@ -27,7 +27,7 @@
     [clojusc/twig "0.3.2"]
     [com.stuartsierra/component "0.3.2"]
     [environ "1.1.0"]
-    [http-kit "2.2.0"]
+    [http-kit "2.3.0"]
     [metosin/reitit-core "0.1.1-SNAPSHOT"]
     [metosin/reitit-ring "0.1.1-SNAPSHOT"]
     [metosin/ring-http-response "0.9.0"]


version 0.3.1-SNAPSHOT

version 0.3.1-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject clojure-protobuf "0.3.0-SNAPSHOT"
+(defproject clojure-protobuf "0.3.1-SNAPSHOT"
   :description "Clojure-protobuf provides a clojure interface to Google's protocol buffers."
   :dependencies [[clojure "1.2.0"]
                  [clojure-useful "0.3.0-SNAPSHOT"]]


Welcome reitit-parent

Welcome reitit-parent

--- project.clj
+++ project.clj
@@ -1,6 +1,6 @@
 (def VERSION "0.1.0-SNAPSHOT")

-(defproject metosin/reitit VERSION
+(defproject metosin/reitit-parent VERSION
   :description "Snappy data-driven router for Clojure(Script)"
   :url "https://github.com/metosin/reitit"
   :license {:name "Eclipse Public License"


(maint) Update to SNAPSHOT version

(maint) Update to SNAPSHOT version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(def ps-version "5.3.0")
+(def ps-version "5.3.1-SNAPSHOT")
 (def jruby-1_7-version "1.7.27-1")
 (def jruby-9k-version "9.1.15.0-2")


use release version

use release version

--- project.clj
+++ project.clj
@@ -9,8 +9,8 @@
                               :username :env :passphrase :env}}
   :dependencies [[org.clojure/clojure "1.5.1"]
                  [org.clojure/tools.logging "0.2.6"]
-                 [yieldbot/serializable-fn "0.0.3-SNAPSHOT"]
-                 [com.twitter/carbonite "1.3.3-SNAPSHOT"]
+                 [yieldbot/serializable-fn "0.0.3"]
+                 [com.twitter/carbonite "1.3.3"]
                  [com.twitter/chill_2.9.3 "0.3.5"]]
   :plugins [[s3-wagon-private "1.1.2"]]
   :profiles {:provided


(maint) update project.clj for 4.2.2

(maint) update project.clj for 4.2.2

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(def pdb-version "4.2.2-SNAPSHOT")
+(def pdb-version "4.2.2")

 (defn deploy-info
   "Generate deployment information from the URL supplied and the username and


0.9.4

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject vorrichtung "0.9.3"
+(defproject vorrichtung "0.9.4"
   :dependencies [[org.clojure/clojure "1.8.0"]
                  [org.clojure/clojurescript "1.9.293"]
                  [binaryage/devtools "0.8.3"]


fixed merge problem

fixed merge problem

--- project.clj
+++ project.clj
@@ -86,12 +86,6 @@
                                                      [org.apache.spark/spark-mllib_2.10 "2.0.2" ]
                                                      ] }

-             :spark-2.1.0  ^{:pom-scope :provided} {:dependencies
-                                                    [[org.apache.spark/spark-core_2.10 "2.1.0"]
-                                                     [com.github.fommil.netlib/all "1.1.2" :extension "pom"]
-                                                     [com.googlecode.matrix-toolkits-java/mtj "1.0.4"]
-                                                     [org.apache.spark/spark-mllib_2.10 "2.1.0" ]
-                                                     ] }

              :test         {:resource-paths ["dev-resources" "data"]


(maint) Bump version to 6.0.4-SNAPSHOT

(maint) Bump version to 6.0.4-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(def pdb-version "6.0.3")
+(def pdb-version "6.0.4-SNAPSHOT")
 (def clj-parent-version "2.6.0")

 (defn true-in-env? [x]


Update datomic free to 0.9.4956

Update datomic free to 0.9.4956

--- project.clj
+++ project.clj
@@ -59,7 +59,7 @@
                  [irclj "0.5.0-alpha4"]

                  ; database
-                 [com.datomic/datomic-free "0.8.3814"]
+                 [com.datomic/datomic-free "0.9.4956"]
                  [datomico "0.2.0"]

                  ; javascript evaluation


1.11-SNAPSHOT.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject com.draines/postal "1.10.1"
+(defproject com.draines/postal "1.11-SNAPSHOT"
   :repositories {"java.net" "http://download.java.net/maven/2"}
   :dependencies [[commons-codec "1.7"]
                  [javax.mail/mail "1.4.4"


Update dependencies

Update dependencies

--- project.clj
+++ project.clj
@@ -6,15 +6,18 @@
   :dependencies [[org.clojure/clojure "1.10.3"]
                  [compojure "1.6.2"]
                  [ring/ring "1.9.3"]
-                 [ring/ring-defaults "0.3.2"]
-                 [selmer "1.12.34"]
+                 [ring/ring-defaults "0.3.3"]
+                 [selmer "1.12.40"]
                  [cheshire "5.10.0"]
-                 [org.postgresql/postgresql "42.2.20"]
+                 [org.postgresql/postgresql "42.2.21"]
                  [org.clojure/java.jdbc "0.7.12"]
                  [honeysql "1.0.461"]
                  [buddy/buddy-auth "3.0.1"]
                  [com.yubico/yubico-validation-client2 "3.1.0"]
                  [org.apache.commons/commons-text "1.9"]
+                 ;; Needed to fix problem with old version of commons-codec
+                 ;; included by commons-text
+                 [commons-codec/commons-codec "1.15"]
                  [org.clojure/tools.logging "1.1.0"]
                  [org.slf4j/slf4j-log4j12 "1.7.30"]
                  [org.jsoup/jsoup "1.13.1"]


remove storm dependency

remove storm dependency

--- project.clj
+++ project.clj
@@ -21,7 +21,6 @@
   :dependencies [[commons-collections/commons-collections "3.2.1"]
                  [cheshire "5.3.1"]
                  [org.clojure/tools.reader "0.8.13"]
-                 ;[com.taoensso/timbre "3.3.1"]
                  [com.taoensso/timbre "4.2.1"]
                  ;; Troublesome carmine...
                  ;[com.taoensso/carmine "2.7.0" :exclusions [org.clojure/clojure]]
@@ -41,17 +40,16 @@
                  [org.clojure/tools.namespace "0.2.7"]
                  [org.clojure/tools.logging "0.3.0"]
                  [org.clojure/tools.trace "0.7.6"]
+                 ;; We should be able to switch back to this now that we aren't using storm
                  ;[org.clojure/tools.cli "0.3.1"]
                  ;; implicitly requires jetty, component and ring
                  [ring/ring-core "1.4.0" :exclusions [clj-time]]
                  [ring-jetty-component "0.2.3" :exclusions [clj-time]]
                  [ring-basic-authentication "1.0.5"]
                  [ring/ring-ssl "0.2.1"]
-                 ;[javax.servlet/servlet-api "2.5"] ; temp
-                 ;[compojure "1.1.3"] ;; update to 1.4.0 when storm moves
-                 ;; fuck it; using bidi
                  [bidi "1.20.3" :exclusions [prismatic/schema]]
-                 [org.apache.storm/storm-core "0.9.2-incubating"]
+                 ;; Taking out storm cause yeah...
+                 ;[org.apache.storm/storm-core "0.9.2-incubating"]
                  [bigml/sampling "2.1.0"]
                  [incanter "1.5.4"]
                  [com.novemberain/monger "3.0.1"]


updated version

updated version

--- project.clj
+++ project.clj
@@ -7,7 +7,7 @@
   :dependencies [[org.clojure/clojure "1.6.0"]
                  [org.clojure/clojurescript "0.0-2356"
                   :exclusions [org.apache.ant/ant]]]
-  :plugins [[lein-cljsbuild "1.0.3"]]
+  :plugins [[lein-cljsbuild "1.0.4"]]
   :cljsbuild {:builds {:dev
                        {:source-paths ["src-cljs"]
                         :compiler {:output-to "resources/public/js/flyer.js"


Next development iteration

Next development iteration

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject lein-droid/lein-droid "0.2.0-preview2"
+(defproject lein-droid/lein-droid "0.2.0-SNAPSHOT"
   :description "Plugin for easy Clojure/Android development and deployment"
   :url "https://github.com/clojure-android/lein-droid"
   :license {:name "Eclipse Public License"


Version 0.3.1

Version 0.3.1

--- project.clj
+++ project.clj
@@ -2,7 +2,7 @@
 (def ks-version "1.3.0")
 (def tk-version "1.3.1")

-(defproject puppetlabs/ring-middleware "0.3.1-SNAPSHOT"
+(defproject puppetlabs/ring-middleware "0.3.1"
   :dependencies [[org.clojure/clojure ~clj-version]

                  ;; begin version conflict resolution dependencies


Updated group of lein-javac.

Updated group of lein-javac.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject ahc-clj "0.1.0"
+(defproject ahc-clj "0.1.1"
   :description      "Async Http Client for Clojure"
   :namespaces       [async.http.client]
   :dependencies     [[org.clojure/clojure "1.2.0-master-SNAPSHOT"]
@@ -7,7 +7,7 @@
   :dev-dependencies [[swank-clojure "1.2.1"]
 		     [leiningen/lein-swank "1.1.0"]
 		     [autodoc "0.7.1"]
-		     [leiningen/lein-javac "1.0.1"]
+		     [org.clojars.neotyk/lein-javac "1.0.1"]
                      [org.eclipse.jetty/jetty-server "7.1.4.v20100610"]]
   :autodoc {:name "ahc-clj"
             :web-src-dir "http://github.com/neotyk/ahc-clj/blob/"


Prepare 3.0.0-beta6 release

Prepare 3.0.0-beta6 release

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject neko "3.0.0-SNAPSHOT"
+(defproject neko "3.0.0-beta6"
   :description "Neko is a toolkit designed to make Android development using Clojure easier and more fun."
   :url "https://github.com/alexander-yakushev/neko"
   :license {:name "Eclipse Public License"


Start 0.3.8-SNAPSHOT

Start 0.3.8-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject nightcode "0.3.7"
+(defproject nightcode "0.3.8-SNAPSHOT"
   :description "An IDE for Clojure and Java"
   :url "https://github.com/oakes/Nightcode"
   :license {:name "Public Domain"