add library dependencies

add library dependencies

--- project.clj
+++ project.clj
@@ -8,6 +8,7 @@
                  [http-kit "2.1.18"]
                  [cheshire "5.3.1"]
                  [clj-http "0.9.2"]
+                 [hiccup "1.0.5"]
                  [compojure "1.1.8"]
                  [com.google.guava/guava "17.0"]
                  [clojurewerkz/urly "1.0.0"
@@ -25,10 +26,10 @@
   :profiles {:dev {:dependencies [[ring/ring-devel "1.3.0"]
                                   [org.clojure/tools.trace "0.7.8"]]}}
   :plugins [[lein-environ "0.5.0"]
-            [lein-cljsbuild "1.0.3"]]
+            [lein-cljsbuild "1.0.3"]
+            [com.cemerick/austin "0.1.4"]]
   :source-paths ["src/clj"]
-  :cljsbuild {
-              :builds [{:id "release"
+  :cljsbuild {:builds [{:id "release"
                         :source-paths ["src/cljs"]
                         :compiler {
                                    :output-to "resources/public/js/app.js"


Prepare for next release cycle.

Prepare for next release cycle.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject onyx-app/lein-template "0.9.7.0-alpha21"
+(defproject onyx-app/lein-template "0.9.7.0-SNAPSHOT"
   :description "Onyx Leiningen application template"
   :url "https://github.com/onyx-platform/onyx-template"
   :license {:name "MIT License"


type hints added

type hints added

--- clj-util/src/clj_util/cas.clj
+++ clj-util/src/clj_util/cas.clj
@@ -5,18 +5,18 @@

 (defn cas-params [uri user passwd] (CasParams/apply uri user passwd))

-(defn cas-client [uri] (CasClient. uri cl/client))
+(defn cas-client [^String uri] (CasClient. uri cl/client))

-(defn cassableclient [cc cp] (CasAuthenticatingClient. cc cp cl/client))
+(defn cassableclient [^CasClient cc ^CasParams cp] (CasAuthenticatingClient. cc cp cl/client))

 (def current-client (atom nil))

-(defn set-cas [uri]
+(defn set-cas [^String uri]
   (let [cc (cas-client uri)]
     (swap! current-client (constantly cc))))

-(defn get [cp uri & options]
+(defn get [^CasParams cp ^String uri & options]
   ((partial apply cl/get uri :cl (cassableclient @current-client cp)) options))

-(defn post [cp uri body & options]
+(defn post [^CasParams cp ^String uri body & options]
   ((partial apply cl/post uri body :cl (cassableclient @current-client cp)) options))


(fix) fixed java source option

(fix) fixed java source option

--- project.clj
+++ project.clj
@@ -8,5 +8,5 @@
   :scm {:url "https://github.com/sunng87/papaline"
         :name "github"}
   :java-source-paths ["java_src"]
-  :javac-options ["-target" "1.6"]
+  :javac-options ["-target" "1.6" "-source" "1.6"]
   :deploy-repositories {"releases" :clojars})


Bump to RC14

Bump to RC14

--- project.clj
+++ project.clj
@@ -39,7 +39,7 @@
        (vec (set (concat (get JVMOPTS :any)
                          (get JVMOPTS os))))))

-(defproject overtone "0.8.0-RC13"
+(defproject overtone "0.8.0-RC14"
   :description "Collaborative Programmable Music. (http://overtone.github.com)"
   :url "http://overtone.github.com/"
   :dependencies [[org.clojure/clojure "1.3.0"]


Update version

Update version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject ci-test "0.1.6-SNAPSHOT"
+(defproject ci-test "0.1.7-SNAPSHOT"
   :description "FIXME: write description"
   :url "http://example.com/FIXME"
   :license {:name "Eclipse Public License"


Version bump.

Version bump.

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


Add some test profiles

Add some test profiles

--- project.clj
+++ project.clj
@@ -9,4 +9,7 @@
   :profiles {:dev {:dependencies [[org.clojure/clojure "1.6.0"]
                                   [org.clojure/test.check "0.7.0"]]
                    :repl-options {:init-ns str.core}}
-             :provided {:dependencies [[org.clojure/clojure "1.6.0"]]}})
+             :provided {:dependencies [[org.clojure/clojure "1.6.0"]]}
+             :1.5 {:dependencies [[org.clojure/clojure "1.5.1"]]}
+             :1.6 {:dependencies [[org.clojure/clojure "1.6.0"]]}
+             :1.7 {:dependencies [[org.clojure/clojure "1.7.0-beta3"]]}})


[WM] set :url in project.clj

[WM] set :url in project.clj

--- project.clj
+++ project.clj
@@ -1,6 +1,6 @@
 (defproject kraken/lein-template "0.2.2"
   :description "Leiningen template for kraken components"
-  :url "http://example.com/FIXME"
+  :url "https://github.com/democracyworks/kraken-lein-template"
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :eval-in-leiningen true)


Build fixes.

Build fixes.

--- project.clj
+++ project.clj
@@ -30,7 +30,8 @@
         :init-ns cmr.client.dev}}
     :test {
       :dependencies [
-        [clojusc/ltest "0.2.0-SNAPSHOT"]]
+        ;[clojusc/ltest "0.2.0-SNAPSHOT"]
+        ]
       :source-paths ["test/clj"]
     }
     :lint {
@@ -87,7 +88,7 @@
     "build-cljs-prod"
       ^{:doc "Build just the prod version of the ClojureScript code"}
       ["do"
-        ["shell" "rm" "resources/public/js/cmr_client.js"]
+        ["shell" "rm" "-f" "resources/public/js/cmr_client.js"]
         ["cljsbuild" "once" "cmr-prod"]]
     "run-tests"
       ^{:doc "Use the ltest runner for verbose, colourful test output"}
@@ -111,7 +112,7 @@
       ^{:doc "Perform the build tasks"}
       ["with-profile" "+test" "do"
         ["check-deps"]
-        ["lint"]
+        ;["lint"]
         ["test"]
         ["compile"]
         ["docs"]


Release 1.16.0

Release 1.16.0

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject toucan "1.15.4"
+(defproject toucan "1.16.0"
   :description "Functionality for defining your application's models and querying the database."
   :url "https://github.com/metabase/toucan"
   :license {:name "Eclipse Public License"


Next dev cycle.

Next dev cycle.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject de.active-group/active-clojure "0.36.0"
+(defproject de.active-group/active-clojure "0.37.0-SNAPSHOT"
   :description "Active Clojure: Various Clojure utilities in use at Active Group"
   :url "http://github.com/active-group/active-clojure"
   :license {:name "Eclipse Public License"


fix the brackets in project.clj

fix the brackets in project.clj

--- project.clj
+++ project.clj
@@ -18,7 +18,7 @@
                  [cheshire "5.5.0"]
                  [buddy/buddy-core "0.7.0"]
                  [buddy/buddy-auth "0.7.0"]
-                 [hiccup "1.0.5"]]
+                 [hiccup "1.0.5"]

                  ;; front-end dependencies
                  [reagent "0.5.0"]]


Changes to make weasel cljs repl work.

Changes to make weasel cljs repl work.

--- project.clj
+++ project.clj
@@ -10,7 +10,7 @@
   :repositories {"my.datomic.com" {:url "https://my.datomic.com/repo"}}

   :dependencies [[org.clojure/clojure "1.6.0"]
-                 [org.clojure/clojurescript "0.0-2311"]
+                 [org.clojure/clojurescript "0.0-2342"]
                  [ring "1.3.1"]
                  [compojure "1.1.9"]
                  [enlive "1.1.5"]
@@ -20,7 +20,7 @@
                  [figwheel "0.1.4-SNAPSHOT"]
                  [environ "1.0.0"]
                  [com.cemerick/piggieback "0.1.3"]
-                 [weasel "0.3.0"]
+                 [weasel "0.4.0-SNAPSHOT"]
                  [com.datomic/datomic-pro "0.9.4899"]]

   :plugins [[lein-cljsbuild "1.0.3"]
@@ -45,9 +45,6 @@
                                         :optimizations :none
                                         :pretty-print  true}}}}

-  :figwheel {:http-server-root "public"
-             :css-dirs ["resources/public/css"]}
-
   :profiles {:production {:ring {:open-browser? false
                                  :stacktraces? false
                                  :auto-reload? false}}


Prepare for 0.5.6

Prepare for 0.5.6

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject reiddraper/simple-check "0.5.5"
+(defproject reiddraper/simple-check "0.5.6-SNAPSHOT"
   :description "A QuickCheck inspired property-based testing library."
   :url "http://github.com/reiddraper/simple-check"
   :license {:name "Eclipse Public License"


lein-release plugin: preparing 0.3.10 release

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject prismatic/om-tools "0.3.10-SNAPSHOT"
+(defproject prismatic/om-tools "0.3.10"
   :description "Tools for building Om applications"
   :url "http://github.com/prismatic/om-tools"
   :license {:name "Eclipse Public License - v 1.0"


(PE-18417) Update to bouncycastle 1.55

(PE-18417) Update to bouncycastle 1.55

The version of bouncycastle we are shipping is over 2 years old.
We've had a user report incompatibilities between it and recent
certificates generated by external tools.

This commit updates us to the most recent version, which contains
many bug fixes and features compared to the older version we were
shipping, but should be backward-compatible.

--- project.clj
+++ project.clj
@@ -16,7 +16,7 @@
   :pedantic? :abort

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


lein-release plugin: preparing 1.1.2 release

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject foosball "1.1.2-SNAPSHOT"
+(defproject foosball "1.1.2"
   :dependencies [[org.clojure/clojure "1.5.1"]
                  [org.clojure/clojurescript "0.0-1844"]
                  [com.datomic/datomic-free "0.8.3941" :exclusions [com.amazonaws/aws-java-sdk]]


Update to logback 1.1.1 (fixes bug encountered in jetty9)

--- project.clj
+++ project.clj
@@ -13,7 +13,7 @@
                  [prismatic/schema "0.2.0"]
                  [org.clojure/tools.nrepl "0.2.3"]
                  [org.clojure/tools.macro "0.1.2"]
-                 [ch.qos.logback/logback-classic "1.0.13"]
+                 [ch.qos.logback/logback-classic "1.1.1"]
                  [puppetlabs/typesafe-config "0.1.1"]]

   :lein-release {:scm         :git


lein-release plugin: bumped version from 0.67 to 0.68-SNAPSHOT for next development cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject shuppet "0.67"
+(defproject shuppet "0.68-SNAPSHOT"
   :description "Shuppet service"
   :url "http://wikis.in.nokia.com/NokiaMusicArchitecture/Shuppet"


lein-release plugin: bumped version from 0.3.0 to 0.3.1-SNAPSHOT for next development cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject org.domaindrivenarchitecture/dda-backup-crate "0.3.0"
+(defproject org.domaindrivenarchitecture/dda-backup-crate "0.3.1-SNAPSHOT"
   :description "A crate to handle configuration, their dependencies, documentation and validation"
   :url "https://www.domaindrivenarchitecture.org"
   :license {:name "Apache License, Version 2.0"


release 2.9.13

release 2.9.13

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject babel "2.9.13-SNAPSHOT"
+(defproject babel "2.9.13"
   :description "A library for natural language generation and parsing"
   :url "http://github.com/ekoontz/babel"
   :license {:name "Eclipse Public License"


update all the libs

update all the libs

--- project.clj
+++ project.clj
@@ -8,76 +8,76 @@
   ;:jvm-opts ^:replace []
   :jvm-opts ["-Xmx4g"]
   :repl-options {:timeout 120000
-                 :nrepl-middleware [com.gfredericks.debug-repl/wrap-debug-repl]
+                 ;:nrepl-middleware [com.gfredericks.debug-repl/wrap-debug-repl]
                  :port 34344}
   :target-path "target/%s"
   :javac-target "1.7"
   :repositories {"twitter4j" "https://twitter4j.org/maven2"}
-  :plugins [;; need to add profiles to use this to avoid clout dep issue
-            [lein-gorilla "0.4.0"]
-            [cider/cider-nrepl "0.16.0"]]
+  :plugins [];; need to add profiles to use this to avoid clout dep issue
+            ;[lein-gorilla "0.4.0"]
+            ;[cider/cider-nrepl "0.16.0"]]
             ;[lein-environ "0.4.0"]

   :git-dependencies [["https://github.com/GeorgeJahad/debug-repl.git" "master"]]
   :dependencies [;; org.clojure stuff...
-                 [org.clojure/clojure "1.9.0-RC2"]
-                 [org.clojure/spec.alpha "0.1.143"]
-                 [org.clojure/core.async "0.3.465"]
-                 [org.clojure/data.csv "0.1.3"]
+                 [org.clojure/clojure "1.10.0"]
+                 [org.clojure/spec.alpha "0.2.176"]
+                 [org.clojure/core.async "0.4.490"]
+                 [org.clojure/data.csv "0.1.4"]
                  [org.clojure/math.numeric-tower "0.0.4"]
                  [org.clojure/core.match "0.2.2"]
                  [org.clojure/tools.namespace "0.2.10"]
-                 [org.clojure/tools.logging "0.3.1"]
-                 [org.clojure/tools.trace "0.7.9"]
-                 [org.clojure/tools.reader "0.10.0"]
+                 [org.clojure/tools.logging "0.4.1"]
+                 [org.clojure/tools.trace "0.7.10"]
+                 [org.clojure/tools.reader "1.3.2"]
                  ;; Other stuff
-                 [commons-collections/commons-collections "3.2.1"]
-                 [cheshire "5.6.3"]
-                 [com.taoensso/timbre "4.7.4"]
+                 [commons-collections/commons-collections "20040616"]
+                 [cheshire "5.8.1"]
+                 [com.taoensso/timbre "4.10.0"]
                  ;; Troublesome carmine... was using this for simulation stuff
                  ;[com.taoensso/carmine "2.7.0" :exclusions [org.clojure/clojure]]
                  ;; Updates; requires fixing index conflict between named-matrix and core.matrix
-                 [net.mikera/core.matrix "0.57.0"]
-                 [net.mikera/vectorz-clj "0.45.0"]
+                 [net.mikera/core.matrix "0.62.0"]
+                 [net.mikera/vectorz-clj "0.48.0"]
                  ;[net.mikera/core.matrix "0.23.0"]
                  [net.mikera/core.matrix.stats "0.7.0"]
-                 [net.mikera/vectorz-clj "0.45.0"]
+                 [net.mikera/vectorz-clj "0.48.0"]
                  [criterium "0.4.4"]
-                 [clj-http "3.4.1"]
+                 [clj-http "3.9.1"]
                  ;; We should be able to switch back to this now that we aren't using storm
-                 [org.clojure/tools.cli "0.3.1"]
+                 [org.clojure/tools.cli "0.4.1"]
                  ;; implicitly requires jetty, component and ring
-                 [ring/ring-core "1.5.0" :exclusions [clj-time]]
+                 [ring/ring-core "1.7.1" :exclusions [clj-time]]
                  [ring-jetty-component "0.3.1" :exclusions [clj-time]]
                  [ring-basic-authentication "1.0.5"]
-                 [ring/ring-ssl "0.2.1"]
-                 [bidi "2.0.14" :exclusions [prismatic/schema]]
+                 [ring/ring-ssl "0.3.0"]
+                 [bidi "2.1.5" :exclusions [prismatic/schema]]
                  ;; Taking out storm cause yeah...
                  ;[org.apache.storm/storm-core "0.9.2-incubating"]
-                 [incanter "1.9.2" :exclusions [org.clojure/clojure]]
-                 [bigml/sampling "3.1"]
-                 [amazonica "0.3.77" :exclusions [org.apache.httpcomponents/httpclient
-                                                  org.apache.httpcomponents/httpcore]]
+                 [incanter "1.9.3" :exclusions [org.clojure/clojure]]
+                 [bigml/sampling "3.2"]
+                 [amazonica "0.3.139" :exclusions [org.apache.httpcomponents/httpclient
+                                                   org.apache.httpcomponents/httpcore]]
                                                   ;com.fasterxml.jackson.core/jackson-core]]
                  ;[com.fasterxml.jackson.core/jackson-core "2.5.3"]
                  ;[com.fasterxml.jackson.core/jackson-databind "2.5.3"]
                  ;[org.clojure/java.jdbc "0.7.0-alpha1"]
-                 [org.postgresql/postgresql "9.2-1004-jdbc4"]
+                 [org.postgresql/postgresql "42.2.5"]
                  [korma "0.4.3"]
-                 [clj-time "0.12.2"]
+                 [clj-time "0.15.1"]
                  [clj-excel "0.0.1"]
-                 [semantic-csv "0.1.0"]
-                 [dk.ative/docjure "1.11.0"]
-                 [prismatic/plumbing "0.5.3"]
+                 [semantic-csv "0.2.0"]
+                 ;[dk.ative/docjure "1.13.0"]
+                 [prismatic/plumbing "0.5.5"]
                  [environ "1.1.0"]
-                 [mount "0.1.10"]
-                 [honeysql "0.8.2"]
-                 [metasoarous/oz "1.2.1"]
+                 [mount "0.1.15"]
+                 [honeysql "0.9.4"]
+                 [metasoarous/oz "1.5.2"]

                  ;; Dev
                  [org.clojure/test.check "0.9.0"]
-                 [com.gfredericks/debug-repl "0.0.9"]
-                 [irresponsible/tentacles "0.6.1"]]
+                 ;[com.gfredericks/debug-repl "0.0.9"]
+                 [irresponsible/tentacles "0.6.3"]]

   :gorilla-options {:keymap {"command:app:save" "alt+g alt+w"}
                     :port 989796}


Remove akka dependency.

Remove akka dependency.

--- project.clj
+++ project.clj
@@ -7,7 +7,6 @@
   :jvm-opts ["-Dclojure.compiler.direct-linking=true"]
   :dependencies [[org.clojure/clojure "1.8.0" :scope "provided"]
                  [org.slf4j/slf4j-simple "1.7.14"]
-                 [com.typesafe.akka/akka-actor_2.11 "2.4.1"]
                  [mount "0.1.9"]
                  [funcool/wydra "0.1.0-SNAPSHOT"]
                  [funcool/promesa "0.8.0"]


updates server deps

updates server deps


Version 0.0.2

Version 0.0.2

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject pe-datomic-testutils "0.0.2-SNAPSHOT"
+(defproject pe-datomic-testutils "0.0.2"
   :description "A Clojure library of helper functions to aid in unit testing projects that leverage Datomic."
   :url "https://github.com/evanspa/pe-datomic-testutils"
   :license {:name "MIT"


Setup clojars deployment

Setup clojars deployment

--- project.clj
+++ project.clj
@@ -4,6 +4,15 @@
   :license {:name         "MIT License"
             :url          "http://opensource.org/licenses/MIT"
             :distribution :repo}
+  :scm {:name "git"
+        :url "https://github.com/binaryage/cljs-devtools"}
+  :signing {:gpg-key "DDD8C87F"}
+  :deploy-repositories [["clojars" {:creds :gpg}]]
+  :pom-addition [:developers [:developer
+                              [:name "Antonin Hildebrand"]
+                              [:url "https://github.com/darwin"]
+                              [:email "antonin@hildebrand.cz"]
+                              [:timezone "+1"]]]

   :dependencies [[org.clojure/clojure "1.6.0" :scope "provided"]
                  [org.clojure/clojurescript "0.0-2850" :scope "provided"]


Update merkledag-core for Serializable.

Update merkledag-core for Serializable.

--- project.clj
+++ project.clj
@@ -16,7 +16,7 @@
    [org.clojure/tools.logging "0.4.0"]
    [bigml/sketchy "0.4.1"]
    [mvxcvi/blocks "1.1.0"]
-   [mvxcvi/merkledag-core "0.4.0"]
+   [mvxcvi/merkledag-core "0.4.1"]
    [mvxcvi/merkledag-ref "0.2.0"]]

   :test-selectors


bump version of template to deploy v0.9.0 of re-frame;

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject re-frame/lein-template "0.2.5-3"
+(defproject re-frame/lein-template "0.2.6"
   :description "Leiningen template for a Reagent web app that implements the re-frame pattern."
   :url "https://github.com/Day8/re-frame-template"
   :license {:name "MIT"}


Updated version for next release cycle

Updated version for next release cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject lein-pallet-release "0.1.14"
+(defproject lein-pallet-release "0.1.15-SNAPSHOT"
   :description "A leiningen plugin for the PalletOps release workflow"
   :url "http://github.com/palletops/lein-pallet-release"
   :license {:name "Eclipse Public License"


lein-release plugin: bumped version from 0.9.10 to 0.9.11-SNAPSHOT for next development cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject foosball "0.9.10"
+(defproject foosball "0.9.11-SNAPSHOT"
   :dependencies [[org.clojure/clojure "1.5.1"]
                  [com.datomic/datomic-free "0.8.3941" :exclusions [com.amazonaws/aws-java-sdk]]
                  [lib-noir "0.6.4"]


lein-release plugin: preparing 0.2.8 release

--- project.clj
+++ project.clj
@@ -4,7 +4,7 @@
     [http-kit "2.1.18"]
     [hiccup "1.0.5"]])

-(defproject racehub/om-bootstrap "0.2.8-SNAPSHOT"
+(defproject racehub/om-bootstrap "0.2.8"
   :description "Bootstrap meets Om."
   :url "http://github.com/racehub/om-bootstrap"
   :license {:name "MIT Licens"


lein-release plugin: bumped version from 0.149 to 0.150-SNAPSHOT for next development cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject maestro "0.149"
+(defproject maestro "0.150-SNAPSHOT"
   :description "Maestro service"
   :license  "https://github.com/mixradio/mr-maestro/blob/master/LICENSE"


Update dependencies

Update dependencies

--- project.clj
+++ project.clj
@@ -7,19 +7,19 @@
                  [ring "1.7.1"]
                  [ring/ring-defaults "0.3.2"]
                  [org.postgresql/postgresql "42.2.5"]
-                 [org.clojure/java.jdbc "0.7.8"]
+                 [org.clojure/java.jdbc "0.7.9"]
                  [honeysql "0.9.4"]
                  [clj-time "0.15.1"]
                  [cheshire "5.8.1"]
-                 [selmer "1.12.6"]
+                 [selmer "1.12.8"]
                  [clj-http "3.9.1"]
                  [org.clojure/tools.logging "0.4.1"]
-                 [org.slf4j/slf4j-log4j12 "1.7.25"]
-                 [com.yubico/yubico-validation-client2 "3.0.4"]
+                 [org.slf4j/slf4j-log4j12 "1.7.26"]
+                 [com.yubico/yubico-validation-client2 "3.0.5"]
                  [buddy/buddy-hashers "1.3.0"]
                  [buddy/buddy-auth "2.1.0"]
                  [org.clojars.pntblnk/clj-ldap "0.0.16"]
-                 [org.influxdb/influxdb-java "2.14"]]
+                 [org.influxdb/influxdb-java "2.15"]]
   :main env-logger.handler
   :aot [env-logger.handler
         clojure.tools.logging.impl]


namespace project name

namespace project name

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject galleon "0.1.0"
+(defproject org.vlacs/galleon "0.1.0"
   :description "Galleon is a library that ties together multiple web app libraries
                to turn them into a single cohesive application."
   :url "https://www.github.com/vlacs/galleon"


Pull in clj-http from lib. Increase lib version.

--- project.clj
+++ project.clj
@@ -24,7 +24,7 @@
     [org.clojure/tools.namespace "0.3.0-alpha4" :exclusions [org.clojure/tools.reader]]

     ;; Library for OC projects https://github.com/open-company/open-company-lib
-    [open-company/lib "0.16.28alpha"]
+    [open-company/lib "0.16.28alpha1"]
     ;; In addition to common functions, brings in the following common dependencies used by this project:
     ;; Component - Component Lifecycle https://github.com/stuartsierra/component
     ;; Schema - Data validation https://github.com/Prismatic/schema
@@ -35,8 +35,7 @@
     ;; clj-time - Date and time lib https://github.com/clj-time/clj-time
     ;; Environ - Get environment settings from different sources https://github.com/weavejester/environ
     ;; soup - Clojure wrapper for jsoup HTML parser https://github.com/mfornos/clojure-soup
-    ;; Clojure HTTP client https://github.com/dakrone/clj-http
-    [clj-http "3.9.1"]
+    ;; clj-http - Clojure HTTP client https://github.com/dakrone/clj-http
   ]

   ;; All profile plugins


Version 1.0.17-SNAPSHOT

Version 1.0.17-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject re-frame/lein-template "1.0.16"
+(defproject re-frame/lein-template "1.0.17-SNAPSHOT"
   :description "Leiningen template for a Reagent web app that implements the re-frame pattern."
   :url "https://github.com/Day8/re-frame-template"
   :license {:name "MIT"}


Pull in twitter api

Pull in twitter api

--- project.clj
+++ project.clj
@@ -12,7 +12,8 @@
                  [com.novemberain/langohr "3.5.1"]
                  [doric "0.9.0"]
                  [robert/bruce "0.8.0"]
-                 [server-socket "1.0.0"]]
+                 [server-socket "1.0.0"]
+                 [twitter-api "0.7.8"]]
   :plugins [[cider/cider-nrepl "0.10.1"]]
   :min-lein-version "2.5.3"
   :uberjar-name "myshelf-standalone.jar")


Move to snapshot

Move to snapshot

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject spiral "0.1.1"
+(defproject spiral "0.1.2-SNAPSHOT"
   :description "core.async based http server library"
   :url "http://github.com/dgrnbrg/spiral"
   :license {:name "Eclipse Public License"


project: bump riemann-clojure-client dependency

--- project.clj
+++ project.clj
@@ -37,7 +37,7 @@
     [interval-metrics "1.0.0"]
     [io.netty/netty-all "4.0.34.Final"]
     [clj-antlr "0.2.2"]
-    [riemann-clojure-client "0.4.1"]
+    [riemann-clojure-client "0.4.2"]
     [less-awful-ssl "1.0.0"]
     [slingshot "0.12.2"]
     [clj-campfire "2.2.0"]


lein-release plugin: bumped version from 0.7.0 to 0.7.1-SNAPSHOT for next development cycle

--- project.clj
+++ project.clj
@@ -1,7 +1,7 @@
 (def tk-version "0.4.3")
 (def ks-version "0.7.2")

-(defproject puppetlabs/trapperkeeper-webserver-jetty9 "0.7.0"
+(defproject puppetlabs/trapperkeeper-webserver-jetty9 "0.7.1-SNAPSHOT"
   :description "We are trapperkeeper.  We are one."
   ;; Abort when version ranges or version conflicts are detected in
   ;; dependencies. Also supports :warn to simply emit warnings.


Updated project file to version 0.2.2

Updated project file to version 0.2.2

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject hiccup "0.2.1"
+(defproject hiccup "0.2.2"
   :dependencies [[org.clojure/clojure "1.1.0"]
                  [org.clojure/clojure-contrib "1.1.0"]]
   :dev-dependencies [[lein-clojars "0.5.0-SNAPSHOT"]])


0.2.0

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject aemette/lein-template "0.2.0-SNAPSHOT"
+(defproject aemette/lein-template "0.2.0"
   :description "A batteries-included Leiningen template for Om"
   :url "https://github.com/anmonteiro/aemette"
   :license {:name "Eclipse Public License"


Updated versions

Updated versions

--- project.clj
+++ project.clj
@@ -5,11 +5,11 @@
             :url  "http://www.eclipse.org/legal/epl-v10.html"}

   :dependencies [[org.clojure/clojure "1.8.0"]
-                 [org.clojure/clojurescript "1.9.293"]
+                 [org.clojure/clojurescript "1.9.473"]
                  [com.cognitect/transit-cljs "0.8.239"]
-                 [com.taoensso/timbre "4.7.4"]
-                 [figwheel "0.5.8"]
-                 [fipp "0.6.7"]
+                 [com.taoensso/timbre "4.8.0"]
+                 [figwheel "0.5.9"]
+                 [fipp "0.6.9"]
                  [hiccup "1.0.5"]
                  [doo "0.1.7"]
                  [reagent "0.6.0"]
@@ -26,7 +26,7 @@
   :minify-assets  {:assets {"resources/public/css/site.min.css" "resources/public/css/site.css"}}

   :profiles {:frontend {:dependencies [[ca.gt0.theasp/reagent-mdl "0.1.0-SNAPSHOT"]
-                                       [cljsjs/clipboard "1.5.13-0"]
+                                       [cljsjs/clipboard "1.5.13-1"]
                                        [cljsjs/codemirror "5.21.0-2"]]

                         :clean-targets ^{:protect false} [:target-path


Added foundations for docs and static files.

--- project.clj
+++ project.clj
@@ -126,6 +126,18 @@
       ]
     "ltest" ["with-profile" "+test,+system" "ltest"]
     "junit" ["with-profile" "+test,+system" "test2junit"]
+    ;; Documentation
+    "codox" ["with-profile" "+docs" "codox"]
+    "marginalia" ["with-profile" "+docs"
+      "marg" "--dir" "resources/public/docs/marginalia"
+             "--file" "index.html"
+             "--name" "OPeNDAP/CMR Integration"]
+    "generate-html" ["with-profile" "+docs"
+      "run" "-m" "cmr.opendap.site.static"]
+    "generate-static" ["do"
+      ["codox"]
+      ["marginalia"]
+      ["generate-html"]]
     "version" ["do"
       ["version"]
       ["shell" "echo" "-n" "CMR-OPeNDAP: "]
@@ -136,17 +148,10 @@
     "build" ["do"
       ["ltest" ":unit"]
       ["junit" ":unit"]
+      ["generate-static"]
       ["ubercompile"]
       ["uberjar"]]
-    ;; Documentation
-    "codox" ["with-profile" "+docs" "codox"]
-    "marginalia" ["with-profile" "+docs"
-      "marg" "--dir" "resources/public/docs/marginalia"
-             "--file" "index.html"
-             "--name" "OPeNDAP/CMR Integration"]
-    "docs" ["do"
-      ["codox"]
-      ["marginalia"]]
+
     ;; Application
     "start-cmr-opendap"
       ["trampoline" "run"]})


Set version to 1.1.0.

Set version to 1.1.0.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject funcool/bide "1.0.6"
+(defproject funcool/bide "1.1.0"
   :description "Simple routing for ClojureScript"
   :url "https://github.com/funcool/bide"
   :license {:name "BSD (2-Clause)"


turn campfire off

turn campfire off

--- project.clj
+++ project.clj
@@ -88,6 +88,7 @@
         :service-local-config-path "test/shuppet/resources"
         :service-local-app-names "localtest"
         :service-delete-allowed true
+        :service-campfire-off true
         }

   :lein-release {:release-tasks [:clean :uberjar :pom :rpm]


Version 0.2.12-SNAPSHOT

Version 0.2.12-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject yetibot.core "0.2.11"
+(defproject yetibot.core "0.2.12-SNAPSHOT"
   :description "Core yetibot utilities, extracted for shared use among yetibot
                 and its various plugins"
   :url "https://github.com/devth/yetibot.core"


update project.cljs add source-paths

update project.cljs add source-paths

--- project.clj
+++ project.clj
@@ -37,7 +37,7 @@
                         [ring-mock "0.1.5"]]}}
   :cljsbuild {:builds
               [{:id "app"
-                :source-paths ["src_cljs"]
+                :source-paths ["src_cljs/"]
                 :compiler {:output-to "resources/public/js/app.js"
                            :output-dir "resources/public/js/out"
                            :source-map true


release rc3

release rc3

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject datasplash "0.5.0-SNAPSHOT"
+(defproject datasplash "0.5.0-rc3"
   :description "Clojure API for a more dynamic Google Cloud Dataflow"
   :url "https://github.com/ngrunwald/datasplash"
   :license {:name "Eclipse Public License"


lein-release plugin: preparing 1.0.0 release

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject party "1.0.0-SNAPSHOT"
+(defproject party "1.0.0"

   :description "A Clojure library that wraps the Curator service discovery/registration API."


Update version

Update version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject brutha "0.1.1"
+(defproject brutha "0.1.2"
   :description "FIXME: write description"
   :url "http://brutha.herokuapp.com"
   :license {:name "Eclipse Public License"


Small nicety cleanups to project.clj

Small nicety cleanups to project.clj

--- project.clj
+++ project.clj
@@ -14,7 +14,7 @@
   :source-paths ["src/clj"]
   :test-paths   ["test/clj"]

-  :main comic-reader.system
+  :main ^:skip-aot comic-reader.system

   :aliases {"uberjar" ["do" "clean,"
                        "run" "-m" "comic-reader.tasks.compile-sites,"
@@ -64,7 +64,7 @@
                  :asset-path "js/compiled/out"}}}}

   :profiles {:dev {:jvm-opts ["-XX:-OmitStackTraceInFastThrow"]
-                   :source-paths ["dev-src/clj" "src/cljs"]
+                   :source-paths ["dev-src/clj"]
                    :test-paths   ["test/cljs"]
                    :dependencies [[org.clojure/tools.namespace "0.2.11"]
                                   [radicalzephyr/clansi "1.2.0"]


lein-release plugin: preparing 0.1.0 release

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject lein-jslint "0.1.0-SNAPSHOT"
+(defproject lein-jslint "0.1.0"
   :description "A Leiningen plugin for running JS code through JSLint."
   :url "https://github.com/vbauer/lein-jslint"
   :license {:name "Eclipse Public License"


Add cljs middleware.

Add cljs middleware.

--- project.clj
+++ project.clj
@@ -15,6 +15,8 @@
   :plugins [[lein-cljsbuild "1.0.3"]
             [lein-figwheel "0.1.3-SNAPSHOT"]
             [com.cemerick/austin "0.1.4"]]
+
+  :repl-options  {:nrepl-middleware  [cemerick.piggieback/wrap-cljs-repl]}

   :figwheel {
     :http-server-root "public"


CMR-4985: Fixed build by adding +local profile to ubercompile alias.

--- project.clj
+++ project.clj
@@ -163,7 +163,7 @@
       ["version"]
       ["shell" "echo" "-n" "CMR-OPeNDAP: "]
       ["project-version"]]
-    "ubercompile" ["with-profile" "+system,+geo,+ubercompile" "compile"]
+    "ubercompile" ["with-profile" "+system,+geo,+local,+ubercompile" "compile"]
     "uberjar" ["with-profile" "+system,+geo" "uberjar"]
     "uberjar-aot" ["with-profile" "+system,+geo,+ubercompile" "uberjar"]
     "check-vers" ["with-profile" "+lint" "ancient" "check" ":all"]


Prepare for next release cycle.

Prepare for next release cycle.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject org.onyxplatform/onyx-dashboard "0.9.10.0-beta3"
+(defproject org.onyxplatform/onyx-dashboard "0.9.10.0-SNAPSHOT"
   :description "Dashboard for the Onyx distributed computation system"
   :url "http://github.com/lbradstreet/onyx-dashboard"
   :license {:name "Eclipse Public License"


making project version match plugin version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject memorystone "1.0.1-SNAPSHOT"
+(defproject memorystone "2.0.0-SNAPSHOT"
   :description "FIXME: write description"
   :dependencies [
                      [clj-minecraft "1.0.1-SNAPSHOT"]


Version 0.2.44-SNAPSHOT

Version 0.2.44-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject yetibot.core "0.2.43"
+(defproject yetibot.core "0.2.44-SNAPSHOT"
   :description "Core yetibot utilities, extracted for shared use among yetibot
                 and its various plugins"
   :url "https://github.com/devth/yetibot.core"


Version 0.1.9

Version 0.1.9

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject io.aviso/twixt "0.1.9-SNAPSHOT"
+(defproject io.aviso/twixt "0.1.9"
   :description "An extensible asset pipeline for Clojure web applications"
   :url "https://github.com/AvisoNovate/twixt"
   :license {:name "Apache Sofware Licencse 2.0"


bump version

bump version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject storm/storm-kafka "0.8.0-wip2"
+(defproject storm/storm-kafka "0.9.0-wip1"
   :source-path "src/clj"
   :java-source-path "src/jvm"
   :javac-options {:debug "true" :fork "true"}


Update dependencies.

Update dependencies.

--- project.clj
+++ project.clj
@@ -14,7 +14,7 @@

   :dependencies [
     ;; Server-side
-    [org.clojure/clojure "1.8.0-beta2"] ; Lisp on the JVM http://clojure.org/documentation
+    [org.clojure/clojure "1.8.0-RC4"] ; Lisp on the JVM http://clojure.org/documentation
     [org.clojure/core.match "0.3.0-alpha4"] ; Erlang-esque pattern matching https://github.com/clojure/core.match
     [defun "0.3.0-alapha"] ; Erlang-esque pattern matching for Clojure functions https://github.com/killme2008/defun
     [org.clojure/core.incubator "0.1.3"] ; Functions proposed for inclusion in Clojure https://github.com/clojure/core.incubator
@@ -22,13 +22,13 @@
     [org.flatland/ordered "1.5.3"] ; Ordered hash map https://github.com/flatland/ordered
     [ring/ring-devel "1.4.0"] ; Web application library https://github.com/ring-clojure/ring
     [ring/ring-core "1.4.0"] ; Web application library https://github.com/ring-clojure/ring
-    [http-kit "2.1.19"] ; Web Server http://http-kit.org/
+    [http-kit "2.1.21-alpha2"] ; Web Server http://http-kit.org/
     [compojure "1.4.0"] ; Web routing https://github.com/weavejester/compojure
     [liberator "0.14.0"] ; WebMachine (REST API server) port to Clojure https://github.com/clojure-liberator/liberator
     [com.ashafa/clutch "0.4.0"] ; CouchDB client https://github.com/clojure-clutch/clutch
-    [clojurewerkz/elastisch "2.2.0-beta4"] ; Client for ElasticSearch https://github.com/clojurewerkz/elastisch
+    [clojurewerkz/elastisch "2.2.0-beta5"] ; Client for ElasticSearch https://github.com/clojurewerkz/elastisch
     [environ "1.0.1"] ; Get environment settings from different sources https://github.com/weavejester/environ
-    [com.taoensso/timbre "4.1.4"] ; Logging https://github.com/ptaoussanis/timbre
+    [com.taoensso/timbre "4.2.0-alpha3"] ; Logging https://github.com/ptaoussanis/timbre
     [clj-http "2.0.0"] ; HTTP client https://github.com/dakrone/clj-http
     [superstring "2.1.0"] ; String manipulation https://github.com/expez/superstring
     [commons-codec "1.10" :exclusions [[org.clojure/clojure]]] ; Dependency of compojure, ring-core, and midje http://commons.apache.org/proper/commons-codec/
@@ -52,7 +52,7 @@
       ]
       :plugins [
         [lein-midje "3.2"] ; Example-based testing https://github.com/marick/lein-midje
-        [jonase/eastwood "0.2.2"] ; Clojure linter https://github.com/jonase/eastwood
+        [jonase/eastwood "0.2.3"] ; Clojure linter https://github.com/jonase/eastwood
       ]
     }

@@ -67,7 +67,7 @@
         [org.clojure/tools.trace "0.7.9"] ; Tracing macros/fns https://github.com/clojure/tools.trace
       ]
       :plugins [
-        [lein-cljsbuild "1.1.1"] ; ClojureScript compiler https://github.com/emezeske/lein-cljsbuild
+        [lein-cljsbuild "1.1.2"] ; ClojureScript compiler https://github.com/emezeske/lein-cljsbuild
         [codox "0.9.0"] ; Generate Clojure API docs https://github.com/weavejester/codox
         [lein-bikeshed "0.2.0"] ; Check for code smells https://github.com/dakrone/lein-bikeshed
         [lein-kibit "0.1.2"] ; Static code search for non-idiomatic code https://github.com/jonase/kibit


update core.async to newest release

update core.async to newest release

--- project.clj
+++ project.clj
@@ -4,7 +4,7 @@
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :dependencies [[org.clojure/clojure "1.6.0"]
-                 [org.clojure/core.async "0.1.338.0-5c5012-alpha"]]
+                 [org.clojure/core.async "0.1.346.0-17112a-alpha"]]
   :scm {:url "https://github.com/sunng87/papaline"
         :name "github"}
   :deploy-repositories {"releases" :clojars})


fix and refactor project configuration

fix and refactor project configuration

--- project.clj
+++ project.clj
@@ -1,9 +1,9 @@
 (defproject butler "0.1.0-SNAPSHOT"
-  :description "A minimal ClojureScript library for Web Workers"
-  :dependencies [[org.clojure/clojure "1.6.0"]
-                 [org.clojure/clojurescript "0.0-2202"]]
+  :description "A ClojureScript library for Web Workers"
+  :url "https://github.com/federkasten/butler"
   :plugins [[lein-cljsbuild "1.0.3"]]
-  :profiles {:dev {:plugins [[com.cemerick/austin "0.1.4"]]}}
+  :profiles {:dev {:dependencies [[org.clojure/clojure "1.6.0"]
+                                  [org.clojure/clojurescript "0.0-2227"]]}}
   :source-paths ["src"]
   :cljsbuild {:builds
               {:dev


Change ring to use the secured-app

Change ring to use the secured-app

--- project.clj
+++ project.clj
@@ -12,7 +12,7 @@
                  "src/todo_repl/"
                  "src/todo_repl_webapp/"]
   :plugins [[lein-ring "0.8.5"]]
-  :ring {:handler todo-repl-webapp.handler/app}
+  :ring {:handler todo-repl-webapp.handler/secured-app}
   :profiles
   {:dev {:dependencies [[ring-mock "0.1.5"]
                         [com.cemerick/friend "0.2.0"]]}})


upgrade cljsbuild 1.1.0

upgrade cljsbuild 1.1.0

--- project.clj
+++ project.clj
@@ -5,7 +5,7 @@
             :url "http://www.eclipse.org/legal/epl-v10.html"}
   :dependencies [[org.clojure/clojure "1.6.0"]
                  [org.clojure/clojurescript "0.0-2511"]]
-  :plugins [[lein-cljsbuild "1.0.3"]]
+  :plugins [[lein-cljsbuild "1.1.0"]]
   :hooks [leiningen.cljsbuild]
   :cljsbuild {:builds [{:id "whitespace"
                         :source-paths ["src" "test"]


Set version to 1.2.0.

Set version to 1.2.0.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject funcool/suricatta "1.2.0-SNAPSHOT"
+(defproject funcool/suricatta "1.2.0"
   :description "High level sql toolkit for clojure (backed by jooq library)"
   :url "https://github.com/funcool/suricatta"
   :license {:name "BSD (2-Clause)"


Bump again

Bump again

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject com.wsscode/pathom "2.3.0-alpha3"
+(defproject com.wsscode/pathom "2.3.0-alpha4"
   :description "A Clojure library designed to provide a collection of helper functions to support Clojure(script) graph parsers using\nom.next graph syntax."
   :url "https://github.com/wilkerlucio/pathom"
   :license {:name "MIT"


Prep 0.6.0

Prep 0.6.0

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject kraken-works/lein-template "0.5.3-SNAPSHOT"
+(defproject kraken-works/lein-template "0.6.0-SNAPSHOT"
   :description "Leiningen template for kraken-works components"
   :url "https://github.com/democracyworks/kraken-works-lein-template"
   :license {:name "Eclipse Public License"


Added lein uberjar name

Added lein uberjar name

--- project.clj
+++ project.clj
@@ -11,6 +11,7 @@
                  [cheshire "5.2.0"]
                  [com.novemberain/monger "1.5.0"]
                  ]
+  :uberjar "clojure-todo-standalone.jar"
   :plugins [[lein-ring "0.8.8"]]
   :ring {:handler clojure-todo.handler/app}
   :profiles


Hotfix version

Hotfix version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject foreclojure "1.5.0"
+(defproject foreclojure "1.5.0.1"
   :description "4clojure - a website for lisp beginners"
   :dependencies [[clojure "1.2.1"]
                  [clojure-contrib "1.2.0"]


compile freenas

compile freenas

--- project.clj
+++ project.clj
@@ -93,7 +93,7 @@
           :timeout 120000
         }

-        :aot [remote.capistrano proxmox.provider vc.provider
+        :aot [remote.capistrano proxmox.provider vc.provider freenas.provider
               aws.provider celestial.core celestial.puppet-standalone celestial.launch]

         :test-paths ["test" "data"]


Update jetty service

Update jetty service

--- project.clj
+++ project.clj
@@ -14,7 +14,7 @@
                  [dhruv/ring-secure-headers "0.3.0"]
                  [org.clojure/tools.logging "0.3.1"]
                  [puppetlabs/trapperkeeper "0.5.1"]
-                 [puppetlabs/trapperkeeper-webserver-jetty9 "0.8.0"]
+                 [puppetlabs/trapperkeeper-webserver-jetty9 "0.9.0"]
                  [yesql "0.4.0"]]
   :profiles {:dev {:dependencies [[org.clojure/tools.namespace "0.2.7"]]}}
   :plugins [[lein-jupiter "0.1.0"]]


Bump cljs version

Bump cljs version

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

   :dependencies [[org.clojure/clojure "1.8.0"]
-                 [org.clojure/clojurescript "1.9.225"]
+                 [org.clojure/clojurescript "1.9.227"]
                  [org.clojure/core.async "0.2.385" :exclusions [org.clojure/tools.reader]]
                  [org.clojure/test.check "0.9.0"]
                  [org.omcljs/om "1.0.0-alpha41"]


version 1.0.0-RC1

version 1.0.0-RC1

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject org.zalando.stups/friboo "0.33.0-SNAPSHOT"
+(defproject org.zalando.stups/friboo "1.0.0-RC1"
   :description "A utility library to write microservices in clojure."
   :url "https://github.com/zalando-stups/friboo"


Version 1.11.0-alpha2-SNAPSHOT

Version 1.11.0-alpha2-SNAPSHOT

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject com.taoensso/faraday "1.11.0-alpha1"
+(defproject com.taoensso/faraday "1.11.0-alpha2-SNAPSHOT"
   :author "Peter Taoussanis <https://www.taoensso.com>"
   :description "Clojure DynamoDB client"
   :url "https://github.com/ptaoussanis/faraday"


remove dep on aws-java-sdk from datomic (does not seem needed)

--- project.clj
+++ project.clj
@@ -1,6 +1,6 @@
 (defproject foosball "0.9.7-SNAPSHOT"
   :dependencies [[org.clojure/clojure "1.5.1"]
-                 [com.datomic/datomic-free "0.8.3941"]
+                 [com.datomic/datomic-free "0.8.3941" :exclusions [com.amazonaws/aws-java-sdk]]
                  [lib-noir "0.6.4"]
                  [compojure "1.1.5"]
                  [ring-server "0.2.8"]


Add prismatic schema dependency

Add prismatic schema dependency

--- project.clj
+++ project.clj
@@ -20,6 +20,7 @@

                  ;; Core app dependencies
                  [com.stuartsierra/component "0.3.1"]
+                 [prismatic/schema "1.0.4"]
                  [environ "1.0.1"]

                  ;; Web server


exclude zookeeper client from storm-kafka since it's already available from storm

--- project.clj
+++ project.clj
@@ -2,7 +2,8 @@
   :source-path "src/clj"
   :java-source-path "src/jvm"
   :javac-options {:debug "true" :fork "true"}
-  :dependencies [[storm/kafka "0.6.0"]]
+  :dependencies [[storm/kafka "0.6.0"
+                   :exclusions [org.apache.zookeeper/zookeeper]]]
   :dev-dependencies [[storm "0.7.0-SNAPSHOT"]]
   :jvm-opts ["-Djava.library.path=/usr/local/lib:/opt/local/lib:/usr/lib"]
 )


(PE-2408) Update version of KS test dependency

--- project.clj
+++ project.clj
@@ -30,7 +30,7 @@
   :profiles {:dev {:test-paths ["test-resources"]}
              :test {:dependencies [[clj-http "0.5.3"]
                                    [org.slf4j/slf4j-log4j12 "1.7.5"]
-                                   [puppetlabs/kitchensink "0.3.1-SNAPSHOT" :classifier "test"]]}
+                                   [puppetlabs/kitchensink "0.4.0" :classifier "test"]]}
              :testutils {:source-paths ^:replace ["test"]}
              :uberjar {:aot [puppetlabs.trapperkeeper.main]}}


Bump dependencies

Bump dependencies

--- project.clj
+++ project.clj
@@ -3,10 +3,10 @@
   :url "http://github.com/magnars/optimus-angular"
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
-  :dependencies [[org.clojure/clojure "1.5.1"]
-                 [optimus "0.13.6"]
+  :dependencies [[org.clojure/clojure "1.7.0"]
+                 [optimus "0.18.4"]
                  [clj-v8 "0.1.5"]]
-  :profiles {:dev {:dependencies [[midje "1.5.0"]]
-                   :plugins [[lein-midje "3.0.0"]
+  :profiles {:dev {:dependencies [[midje "1.8.3"]]
+                   :plugins [[lein-midje "3.1.3"]
                              [lein-shell "0.3.0"]]}}
   :prep-tasks [["shell" "./build-js-sources.sh"]])


Remove magic jvm-opts

Remove magic jvm-opts

--- project.clj
+++ project.clj
@@ -1,8 +1,6 @@
 (defproject faceboard "0.1.0-SNAPSHOT"
   :description "FIXME: write this!"
   :url "http://example.com/FIXME"
-
-  :jvm-opts ^:replace ["-Xms512m" "-Xmx512m" "-server"]

   :dependencies [[org.clojure/clojure "1.7.0-beta2"]
                  [org.clojure/clojurescript "0.0-3211"]


Version 1.1.3

Version 1.1.3

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject puppetlabs/lein-ezbake "1.1.3-SNAPSHOT"
+(defproject puppetlabs/lein-ezbake "1.1.3"
   :description "A system for building packages for trapperkeeper-based applications"
   :url "https://github.com/puppetlabs/ezbake"
   :license {:name "Apache License 2.0"


Set version to 1.0.0-SNAPSHOT.

Set version to 1.0.0-SNAPSHOT.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject funcool/datoteka "1.0.0"
+(defproject funcool/datoteka "1.0.0-SNAPSHOT"
   :description "Filesystem utilities and Storage abstraction for Clojure."
   :url "https://github.com/funcool/datoteka"
   :license {:name "BSD (2-Clause)"


Bump version to 5.2.4

Bump version to 5.2.4

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

 (defn pdb-run-sh [& args]


version bump

version bump

--- project.clj
+++ project.clj
@@ -39,7 +39,7 @@
     ;; Pretty-print clj and EDN https://github.com/kkinnear/zprint
     [zprint "0.4.10"]
     ;; Library for OC projects https://github.com/open-company/open-company-lib
-    [open-company/lib "0.16.18"]
+    [open-company/lib "0.16.19"]
     ;; In addition to common functions, brings in the following common dependencies used by this project:
     ;; httpkit - HTTP client/server http://www.http-kit.org/
     ;; defun - Erlang-esque pattern matching for Clojure functions https://github.com/killme2008/defun


Add garden library with lein-plugin

Add garden library with lein-plugin

--- project.clj
+++ project.clj
@@ -10,6 +10,7 @@
                  [cljsjs/google-maps "3.18-1"]
                  [cljsjs/react "0.12.2-5"]
                  [liberator "0.12.2"]
+                 [garden "1.2.5"]
                  [secretary "1.2.1"]
                  [clj-time "0.9.0"]
                  [com.datomic/datomic-pro "0.9.5130"
@@ -72,6 +73,7 @@

                    :source-paths ["env/dev/clj"]
                    :plugins [[lein-figwheel "0.2.5-SNAPSHOT"]
+                             [lein-garden "0.2.6"]
                              [cider/cider-nrepl "0.9.0-SNAPSHOT"]]

                    :injections [(require 'pjstadig.humane-test-output)
@@ -82,6 +84,12 @@
                               :nrepl-port 7002
                               :css-dirs ["resources/public/css"]
                               :ring-handler gtfve.handler/app}
+
+                   :garden {:builds [{:id "main"
+                                      :source-paths ["src/clj/styles"]
+                                      :stylesheet gtfve.styles.core/main
+                                      :compiler {:output-to "resources/public/css/main.css"
+                                                 :pretty-print? true}}]}

                    :env {:dev? true}


Prepare for next release cycle.

Prepare for next release cycle.

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject org.onyxplatform/onyx-metrics "0.10.0.0-alpha7"
+(defproject org.onyxplatform/onyx-metrics "0.10.0.0-SNAPSHOT"
   :description "Instrument Onyx workflows"
   :url "https://github.com/onyx-platform/onyx-metrics"
   :license {:name "Eclipse Public License"


remove unused whitespace

remove unused whitespace

--- project.clj
+++ project.clj
@@ -36,9 +36,6 @@
              ;; :server-ip "127.0.0.1"

              :css-dirs ["resources/public/css"] ;; watch and update CSS
-
-             :ring-handler bitfondue.handler/app
-             }
   :cljsbuild {:builds {:dev {:source-paths ["src-cljs"]

                              :figwheel { :on-jsload "bitfondue.core/on-js-reload" }
@@ -49,6 +46,7 @@
                                         :output-dir "resources/public/js/out"
                                         :source-map-timestamp true }}
                        :prod {:source-paths ["src-cljs"]
+             :ring-handler bitfondue.handler/app}
                               :compiler {:output-to     "resources/public/js/app.js"
                                          :output-dir    "resources/public/js/out"
                                          :source-map    "resources/public/js/out.js.map"


Version 0.3.0

Version 0.3.0

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject lambdacd "0.3.0-SNAPSHOT"
+(defproject lambdacd "0.3.0"
   :description "a library to create a continous delivery pipeline in code"
   :url "http://github.com/flosell/lambdacd"
   :license {:name "Apache License, version 2.0"


0.7.0.1

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject onyx-app/lein-template "0.7.0.0"
+(defproject onyx-app/lein-template "0.7.0.1"
   :description "Onyx 0.6.0 Leiningen application template"
   :url "https://github.com/onyx-platform/onyx-template"
   :license {:name "Eclipse Public License"


lein-release plugin: bumped version from 0.1.0 to 0.1.1-SNAPSHOT for next development cycle

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject puppetlabs/ring-middleware "0.1.0"
+(defproject puppetlabs/ring-middleware "0.1.1-SNAPSHOT"
   :dependencies [[org.clojure/clojure "1.6.0"]
                  [org.clojure/tools.logging "0.2.6"]
                  [ring "1.3.0"]


Moving along to the clj 1.3 alpha2, project.clj changes

--- project.clj
+++ project.clj
@@ -6,15 +6,15 @@
             :distribution :repo
             :comments "See the notice in README.md or details in LICENSE.html"}
   :dependencies [;[org.clojure/clojure "1.3.0-master-SNAPSHOT"]
-                 [org.clojure/clojure "1.3.0-alpha1"]
+                 [org.clojure/clojure "1.3.0-alpha2"]
                  [aleph "0.1.1-SNAPSHOT"]]
-  :dev-dependencies [[vimclojure/server "2.2.0-SNAPSHOT"]
+  :dev-dependencies [[vimclojure/server "2.2.0"]
                      ;[lein-difftest "1.3.1"]
                      ;[swank-clojure "1.3.0-SNAPSHOT"]
                      [org.clojars.ninjudd/lazytest "1.1.3-SNAPSHOT"]
                      ;[org.clojure.contrib/repl-utils "1.3.0-SNAPSHOT"]
-                     [org.clojure.contrib/repl-utils "1.3.0-alpha1"]
-                     [org.clojure.contrib/core "1.3.0-alpha1"]]
+                     [org.clojure.contrib/repl-utils "1.3.0-alpha2"]
+                     [org.clojure.contrib/core "1.3.0-alpha2"]]
                      ;[lein-run "1.0.0-SNAPSHOT"]
                      ;[radagast "1.0.0"]
   ;:warn-on-reflection true


fix everything

fix everything

--- project.clj
+++ project.clj
@@ -4,7 +4,7 @@
             :url "http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html"}
   :min-lein-version "2.0.0"
   :description "native tokyo cabinet libraries"
-  :dependencies [[fs "1.1.2"]
-                 [conch "0.2.4"]]
-  :source-paths ["somewhereovertherainbow"]
-  :eval-in-leiningen true)
+  :profiles {:dev {:dependencies [[fs "1.1.2"]
+                                  [conch "0.2.4"]]}}
+  :omit-source true
+  :eval-in :leiningen)


Upgrades cljfmt

Upgrades cljfmt

--- project.clj
+++ project.clj
@@ -8,7 +8,7 @@
                  [org.clojure/spec.alpha "0.1.123" :scope "provided"]]

   :plugins [[com.jakemccrary/lein-test-refresh "0.20.0"]
-            [lein-cljfmt "0.5.6"]
+            [lein-cljfmt "0.5.7"]
             [lein-cljsbuild "1.1.5" :exclusions [[org.clojure/clojure]]]
             [lein-figwheel "0.5.10"]]


bump version

bump version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject yeller-clojure-client "1.3.4"
+(defproject yeller-clojure-client "1.4.0"
   :description "Clojure client for yellerapp.com"
   :url "https://github.com/tcrayford/yeller_clojure"
   :license {:name "Eclipse Public License"


bugfix for retrieving roles

bugfix for retrieving roles

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject de.sveri/friendui "0.1.0"
+(defproject de.sveri/friendui "0.1.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"


release 2.6.7

release 2.6.7

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject babel "2.6.7-SNAPSHOT"
+(defproject babel "2.6.7"
   :description "A library for natural language generation and parsing"
   :url "http://github.com/ekoontz/babel"
   :license {:name "Eclipse Public License"


version bump

version bump

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject latte "0.3.7-SNAPSHOT"
+(defproject latte "0.4.0-SNAPSHOT"
   :description "LaTTe : a Laboratory for Type Theory Experiments"
   :url "https://github.com/fredokun/LaTTe.git"
   :license {:name "MIT Licence"


Explicitly target JVM 1.8. Fixes #1.

Explicitly target JVM 1.8. Fixes #1.

--- project.clj
+++ project.clj
@@ -28,6 +28,7 @@
   :jvm-opts ["-server"]
   :main rdf-path-examples.evaluation
   :min-lein-version "2.0.0"
+  :javac-options ["-target" "1.8" "-source" "1.8" "-Xlint:-options"]
   :plugins [[lein-ring "0.9.7"]]
   :profiles {:dev {:dependencies [[javax.servlet/servlet-api "2.5"]
                                   [ring/ring-mock "0.3.0"]


marg fork for 1.7

marg fork for 1.7

--- project.clj
+++ project.clj
@@ -19,7 +19,7 @@
              {:dependencies [[midje "1.6.3"]
                              [criterium "0.4.3"]]
               :plugins [[lein-midje "3.1.3"]
-                        [lein-marginalia "0.8.0"]
+                        [michaelblume/lein-marginalia "0.9.0"]
                         [codox "0.8.9"]]
               ;; so gen-class stuff works in the repl
               :aot [flambo.function


Fixed problem with cljsbuild config

Fixed problem with cljsbuild config

--- project.clj
+++ project.clj
@@ -39,12 +39,14 @@
   :cljsbuild {:builds
               {:create-group
                {:source-paths ["src/clojurescript"]
-                :compiler {:asset-path "/cljs/create_group_out"
+                :compiler {:main skuld.create-group.app
+                           :asset-path "/cljs/create_group_out"
                            :output-to "resources/public/cljs/create_group.js"
                            :output-dir "resources/public/cljs/create_group_out"}}
                :groups
                {:source-paths ["src/clojurescript"]
-                :compiler {:asset-path "/cljs/groups_out"
+                :compiler {:main skuld.show-group.app
+                           :asset-path "/cljs/groups_out"
                            :output-to "resources/public/cljs/groups.js"
                            :output-dir "resources/public/cljs/groups_out"}}}}
   :figwheel {:css-dirs ["resources/public/css"]
@@ -57,12 +59,10 @@
          :cljsbuild
          {:builds {:create-group
                    {:figwheel {:on-jsload "skuld.create-group.app/init"}
-                    :compiler {:main skuld.create-group.app
-                               :optimizations :none}}
+                    :compiler {:optimizations :none}}
                    :groups
                    {:figwheel {:on-jsload "skuld.show-group.app/init"}
-                    :compiler {:main skuld.show-group.app
-                               :optimizations :none}}}}}
+                    :compiler {:optimizations :none}}}}}

    :prod {:env {:database-url "database.sqlite"}
           :cljsbuild


Ready to release 1.0.0-beta1

Ready to release 1.0.0-beta1

--- project.clj
+++ project.clj
@@ -1,10 +1,10 @@
 ;; Copyright © 2015, JUXT LTD.

-(defproject aero "0.2.3"
-  :description "Light and fluffy configuration"
+(defproject aero "1.0.0-beta1"
+  :description "A small library for explicit, intentful configuration."
   :url "http://github.com/juxt/aero"
   :license {:name "The MIT License"
             :url "http://opensource.org/licenses/MIT"}
   :dependencies []

-  :profiles {:dev {:dependencies [[org.clojure/clojure "1.7.0"]]}})
+  :profiles {:dev {:dependencies [[org.clojure/clojure "1.8.0"]]}})


Update dependencies

Update dependencies

--- project.clj
+++ project.clj
@@ -9,22 +9,22 @@
   :hooks [leiningen.cljsbuild]

   :dependencies [[org.clojure/clojure "1.9.0-alpha19"]
-                 [org.clojure/clojurescript "1.9.908"]
+                 [org.clojure/clojurescript "1.9.946"]
                  [org.clojure/core.async "0.3.443" :exclusions [org.clojure/tools.reader]]
                  [org.clojure/test.check "0.9.0"]
                  [org.omcljs/om "1.0.0-alpha48"]
-                 [com.cognitect/transit-cljs "0.8.239"]
+                 [com.cognitect/transit-cljs "0.8.243"]
                  [cljs-ajax "0.7.2"]
-                 [lein-doo "0.1.7"]  ;; <-- otherwise it won't find the doo namespaces...
-                 [devcards "0.2.3"]
-                 [sablono "0.8.0"]
+                 [lein-doo "0.1.8"]  ;; <-- otherwise it won't find the doo namespaces...
+                 [devcards "0.2.4"]
+                 [sablono "0.8.1"]
                  [inflections "0.13.0"]]

   :plugins [[lein-ancient "0.6.10"]
             [lein-cljsbuild "1.1.5" :exclusions [[org.clojure/clojure]]]
             [lein-codox "0.10.3"]
-            [lein-doo "0.1.7"]
-            [lein-figwheel "0.5.13"]
+            [lein-doo "0.1.8"]
+            [lein-figwheel "0.5.14"]
             [lein-kibit "0.1.3"]
             [lein-set-version "0.4.1"]]

@@ -35,8 +35,8 @@
   :aliases {"phantomtest" ["do" "clean" ["doo" "phantom" "test" "once"]]
             "build" ["do" "clean" ["cljsbuild" "once" "min"]]}

-  :profiles {:dev {:dependencies [[binaryage/devtools "0.9.4"]
-                                  [figwheel-sidecar "0.5.13"]
+  :profiles {:dev {:dependencies [[binaryage/devtools "0.9.7"]
+                                  [figwheel-sidecar "0.5.14"]
                                   [com.cemerick/piggieback "0.2.2"]]
                    ;; need to add dev source path here to get user.clj loaded
                    :source-paths ["src/discuss"]


Upgrade datomic

Upgrade datomic

--- project.clj
+++ project.clj
@@ -19,9 +19,9 @@
          :destroy kevin.system/destroy }
   :profiles {:production
              {:ring {:open-browser? false :stacktraces? false :auto-reload? false}
-              :dependencies [[com.datomic/datomic-pro "0.9.4578"]]}
+              :dependencies [[com.datomic/datomic-pro "0.9.4699"]]}
              :dev {:source-paths ["dev"]
-                   :dependencies [[com.datomic/datomic-free "0.9.4578"]
+                   :dependencies [[com.datomic/datomic-free "0.9.4699"]
                                   [org.clojure/tools.namespace "0.2.4"]
                                   [org.clojure/java.classpath "0.2.2"]
                                   [javax.servlet/servlet-api "2.5"]


Remove AOT options and bump dependencies versions

Benchmarks showed that AOT-compiling lein-droid yields no performance
boost whatsoever, so I decided to drop it in favor of portability.

--- project.clj
+++ project.clj
@@ -3,17 +3,8 @@
   :url "https://github.com/alexander-yakushev/lein-droid"
   :license {:name "Eclipse Public License"
             :url "http://www.eclipse.org/legal/epl-v10.html"}
-  :dependencies [[org.clojure/clojure "1.5.0"]
-                 [leiningen "2.1.3"]
-                 [leiningen-core "2.1.3"]
-                 [robert/hooke "1.1.2"]
-                 [org.clojure/data.zip "0.1.0"]
-                 [com.cemerick/pomegranate "0.2.0"]]
+  :dependencies [[robert/hooke "1.3.0"]
+                 [org.clojure/data.zip "0.1.1"]]
   :min-lein-version "2.0.0"
   :resource-paths ["res"]
-  :eval-in-leiningen false
-
-  :java-source-paths ["src"]
-  :javac-options     ["-target" "1.6" "-source" "1.6"]
-  :warn-on-reflection true
-  :aot [#"leiningen\.droid"])
+  :eval-in-leiningen true)


adding local-repo back in

adding local-repo back in

--- project.clj
+++ project.clj
@@ -13,6 +13,7 @@
                  [org.apache.curator/curator-test "2.8.0"]
                  [com.stuartsierra/component "0.2.3"]]
   :target-path "target/%s"
+  :local-repo ".m2"
   :profiles {:dev {:dependencies [[org.clojure/tools.namespace "0.2.7"]
                                   [alembic "0.3.2"]]
                    :source-paths ["dev"]}


Increase version

Increase version

--- project.clj
+++ project.clj
@@ -1,4 +1,4 @@
-(defproject io.muoncore/muon-clojure "0.1.18"
+(defproject io.muoncore/muon-clojure "0.1.19"
   :description "FIXME: write description"
   :url "http://example.com/FIXME"
   :license {:name "Eclipse Public License"


fixing log4j exclusions

fixing log4j exclusions

--- project.clj
+++ project.clj
@@ -14,7 +14,7 @@
    :dev-dependencies [
          [circumspec/circumspec "0.0.13"]
          [commons-logging/commons-logging "1.1.1"]
-         [log4j/log4j "1.2.15"]
+         [log4j/log4j "1.2.15" :exclusions [javax.mail/mail javax.jms/jms com.sun.jdmk/jmxtools com.sun.jmx/jmxri] ]
          [native-deps "1.0.5"]
          [org.clojure/tools.trace "0.7.3"]
     ]
@@ -23,7 +23,7 @@
         [com.narkisr/fuse4j-linux-native "2.4.0"]
    ]

-  :exclusions [ javax.mail/mail javax.jms/jms com.sun.jdmk/jmxtools com.sun.jmx/jmxri ]
+
   :jvm-opts [~(str "-Djava.library.path=native/:" (System/getenv "LD_LIBRARY_PATH"))]; http://tinyurl.com/7h6vr6s
   :main  com.narkisr.couchfs.mounter
   :aot [com.narkisr.couchfs.mounter]


Comment out test-command step

Comment out test-command step

--- project.clj
+++ project.clj
@@ -24,12 +24,12 @@

   :source-paths ["src"]
   :cljsbuild
-  {:test-commands
-   {"unit" ["phantomjs"
-            "test/vendor/es5-shim.js"
-            "test/vendor/es5-sham.js"
-            "test/vendor/console-polyfill.js"
-            "target/test.js"]}
+  {;;:test-commands
+   #_{"unit" ["phantomjs"
+              "test/vendor/es5-shim.js"
+              "test/vendor/es5-sham.js"
+              "test/vendor/console-polyfill.js"
+              "target/test.js"]}
    :builds [{:id "test"
              :source-paths ["src" "test"]
              :compiler {:output-to "target/test.js"


fix fn that moved to different ns

fix fn that moved to different ns

--- src/pc/http/datomic.clj
+++ src/pc/http/datomic.clj
@@ -31,7 +31,7 @@

 ;; TODO: this should use a channel instead of a future
 (defn send-emails [transaction]
-  (let [annotations (delay (get-annotations transaction))]
+  (let [annotations (delay (datomic-common/get-annotations transaction))]
     (doseq [datom (:tx-data transaction)]
       (when (and (:added datom)
                  (= :needs-email (schema/get-ident (:a datom)))
@@ -44,7 +44,7 @@
 (defn handle-precursor-pings [transaction]
   (let [db (:db-after transaction)
         datoms (:tx-data transaction)
-        document-id (delay (:db/id (:transaction/document (get-annotations transaction))))
+        document-id (delay (:db/id (:transaction/document (datomic-common/get-annotations transaction))))
         chat-body-eid (d/entid db :chat/body)]
     (when-let [chat-datom (first (filter #(= chat-body-eid (:a %)) datoms))]
       (let [slack-url (if (profile/prod?)


refactoring gatherer

refactoring gatherer

--- src/fowles/gatherer.clj
+++ src/fowles/gatherer.clj
@@ -29,6 +29,11 @@
   (and (>= status 200)
        (< status 300)))

+(defn- log [s msg error status]
+  (println "** " s ":" msg
+           "\n   error :" error
+           "\n   status:" status))
+
 (defn- handle-bad-response
   ":: (hmap, chan, str) -> keyword"
   [{:keys [error status opts]} sleep-ch retries-ch failed-ch]
@@ -37,37 +42,34 @@
     (if (retriable? error status)
       ;; re-queue the same requests
       (do
-        (println "** requeueing:" msg)
-        (println "   error :" error)
-        (println "   status:" status)
-        (println "")
+        (log "requeueing" msg error status)
         (>!! retries-ch msg)
         (>!! sleep-ch :sleep))
-
       ;; report failure
       (do
-        (>!! failed-ch (json/write-str msg))
-        ;; stdout
-        (println "** failed:" msg)
-        (println "   error :" error)
-        (println "   status:" status)
-        (println "")))))
+        (log "failed" msg error status)
+        (>!! failed-ch (json/write-str msg))))))

 (defn- handle-good-response
   ":: (hmap, chan, chan) -> keyword"
   [{:keys [body opts]} next-pages-ch bodies-ch]
   ;; FIXME: don't send clj-hmap, send original json.
-  (let [resp-body (json/read-str body)
-        msg       (:msg opts)]
-    (println "ok")
-    (let [new-acc    (conj (:resp-bodies msg) resp-body)
-          page-token (get resp-body "nextPageToken")]
+  ;; However, we do need to extract the nextPageToken.
+  (let [resp-body  (json/read-str body)
+        msg        (:msg opts)
+        new-acc    (conj (:resp-bodies msg) resp-body)
+        req        (:request msg)
+        page-token (get resp-body "nextPageToken")]
+      (println "ok")
       (if page-token
-        (let [new-msg
-              (assoc (assoc-in msg [:request :args :pageToken] page-token)
-                :resp-bodies new-acc)]
-          (>!! next-pages-ch new-msg))
-        (>!! bodies-ch {:request (:request msg), :resp-bodies new-acc})))))
+        ;; We have another page to grab.  Loop back.
+        (>!! next-pages-ch
+             {:request (assoc-in req [:args :pageToken] page-token)
+              :resp-bodies new-acc})
+        ;; We're done.  Send accumulated result to reporter.
+        (>!! bodies-ch
+             {:request req
+              :resp-bodies new-acc}))))

 (defn- handle-response
   ":: (hmap, chan, chan, str) -> keyword"


[#532] Switch to query params for pivot queries

--- backend/src/akvo/lumen/endpoint/pivot.clj
+++ backend/src/akvo/lumen/endpoint/pivot.clj
@@ -1,10 +1,18 @@
 (ns akvo.lumen.endpoint.pivot
   (:require [akvo.lumen.component.tenant-manager :refer [connection]]
+            [akvo.lumen.http :as http]
             [akvo.lumen.lib.pivot :as pivot]
-            [compojure.core :refer :all]))
+            [cheshire.core :as json]
+            [compojure.core :refer :all])
+  (:import com.fasterxml.jackson.core.JsonParseException))

 (defn endpoint [{:keys [tenant-manager config]}]
-  (context "/api/pivot" {:keys [body tenant] :as request}
+  (context "/api/pivot" {:keys [tenant query-params] :as request}
     (let-routes [tenant-conn (connection tenant-manager tenant)]
       (GET "/:id" [id]
-        (pivot/query tenant-conn id body)))))
+        (if-let [query (get query-params "query")]
+          (try
+            (pivot/query tenant-conn id (json/parse-string query))
+            (catch com.fasterxml.jackson.core.JsonParseException e
+              (http/bad-request {:message (.getMessage e)})))
+          (http/bad-request {:message "No query supplied"}))))))


[#3158] Temporary fix to keep partner vizs working

--- backend/src/akvo/lumen/lib/data_group.clj
+++ backend/src/akvo/lumen/lib/data_group.clj
@@ -44,9 +44,13 @@
                           (map #(format "LEFT JOIN %1$s ON m.instance_id = %1$s.instance_id" %)
                                (:others from))))])))

+(def data-groups-limit 25)
+
+(def data-groups-rows-limit "LIMIT 50000")
+
 (defn data-groups-view
-  [view-name temporary? sql]
-  (format "CREATE %s VIEW %s AS %s" (if temporary? "TEMP" "") view-name sql))
+  [view-name temporary? limit? sql]
+  (format "CREATE %s VIEW %s AS %s %s" (if temporary? "TEMP" "") view-name sql (if limit? data-groups-rows-limit "")))

 (defn view-table-name [uuid]
   (str "dsv_view_" (str/replace uuid "-" "_")))
@@ -63,10 +67,11 @@
     (let [columns (reduce #(into % (:columns %2)) [] data-groups)
           t-name (view-table-name (:dataset-version-id (first data-groups)))]
       (if-not (db.data-group/exists-view? tenant-conn t-name)
-        (->> data-groups
-             data-groups-sql-template
-             data-groups-sql
-             (data-groups-view t-name false)
-             vector
-             (jdbc/execute! tenant-conn)))
+        (let [limit? (> (count data-groups) data-groups-limit)]
+         (->> data-groups
+              data-groups-sql-template
+              data-groups-sql
+              (data-groups-view t-name false limit?)
+              vector
+              (jdbc/execute! tenant-conn))))
       {:table-name t-name :columns columns})))


[#3158] Disable logs in data-group

[#3158] Disable logs in data-group

--- backend/src/akvo/lumen/lib/data_group.clj
+++ backend/src/akvo/lumen/lib/data_group.clj
@@ -61,7 +61,7 @@
     (jdbc/execute! conn [(format "DROP VIEW IF EXISTS %s" view-name)])))

 (defn log** [x]
-  (log/error x)
+  (log/debug x)
   x)

 (defn- all-dg-columns [data-groups]


Move example to latest versions

Move example to latest versions

--- examples/simple/project.clj
+++ examples/simple/project.clj
@@ -2,11 +2,10 @@
   :dependencies [[org.clojure/clojure       "1.7.0"]
                  [org.clojure/clojurescript "1.7.145"]
                  [reagent "0.5.1"]
-                 [re-frame "0.5.0-alpha3"]
-                 [figwheel "0.2.6"]]
+                 [re-frame "0.5.0"]]

   :plugins [[lein-cljsbuild "1.1.0"]
-            [lein-figwheel "0.3.8"]]
+            [lein-figwheel "0.4.1"]]

   :hooks [leiningen.cljsbuild]


deflakes test-delete-service and test-killed-instances (#320)

--- waiter/integration/waiter/basic_test.clj
+++ waiter/integration/waiter/basic_test.clj
@@ -17,6 +17,7 @@
             [clojure.test :refer :all]
             [clojure.tools.logging :as log]
             [clojure.walk :as walk]
+            [plumbing.core :as pc]
             [waiter.interstitial :as interstitial]
             [waiter.service-description :as sd]
             [waiter.util.client-tools :refer :all]
@@ -344,62 +345,56 @@
           (is (pos? (get-in service ["service-description" "cpus"])) service)))
       (delete-service waiter-url service-id))))

-; Marked explicit due to:
-;   FAIL in (test-delete-app) (basic_test.clj:251)
-; test-delete-app service-deleted-from-all-routers
-; [CID=unknown] Expected status: 200, actual: 400
-; Body:{"exception":["Read timed out",
-; "java.net.SocketInputStream.socketRead0(Native Method)",
-; "java.net.SocketInputStream.socketRead(SocketInputStream.java:116)"
-; ...
-; "marathonclj.rest.apps$delete_app.invoke(apps.clj:17)",
-; "waiter.scheduler.marathon.MarathonScheduler$fn__18236.invoke(marathon.clj:260)",
-; "waiter.scheduler$retry_on_transient_server_exceptions_fn$fn__17306.invoke(scheduler.clj:91)"
-; ...
-; "waiter.scheduler.marathon.MarathonScheduler.delete_app(marathon.clj:257)",
-; "waiter.core$delete_app_handler.invokeStatic(core.clj:410)"
-; ...
-(deftest ^:parallel ^:integration-fast ^:explicit test-delete-app
-  (testing-using-waiter-url
-    "test-delete-app"
-    (let [{:keys [service-id cookies]} (make-request-with-debug-info
-                                         {:x-waiter-name (rand-name)}
-                                         #(make-kitchen-request waiter-url %))]
-      (testing "service-known-on-all-routers"
-        (let [services (loop [routers (routers waiter-url)
-                              services []]
-                         (if-let [[_ router-url] (first routers)]
-                           (recur (rest routers)
-                                  (conj services
-                                        (wait-for
-                                          (fn []
-                                            (let [{:keys [body]} (make-request router-url "/apps" :cookies cookies)
-                                                  parsed-body (json/read-str body)]
-                                              (first (filter #(= service-id (get % "service-id")) parsed-body))))
-                                          :interval 2
-                                          :timeout 30)))
-                           services))]
-          (is (every? #(and % (pos? (get-in % ["service-description" "cpus"]))) services)
-              (str "Cannot find service: " service-id " in at least one router."))))
-
-      (testing "service-deleted-from-all-routers"
-        (let [{:keys [body] :as response} (make-request waiter-url (str "/apps/" service-id) :method :delete)]
-          (assert-response-status response 200)
-          (is body)
-          (is (loop [routers (routers waiter-url)
-                     result true]
-                (if-let [[_ router-url] (first routers)]
-                  (recur (rest routers)
-                         (and result
-                              (wait-for
-                                (fn []
-                                  (let [{:keys [body]} (make-request router-url "/apps" :cookies cookies)
-                                        parsed-body (json/read-str body)]
-                                    (empty? (filter #(= service-id (get % "service-id")) parsed-body))))
-                                :interval 2
-                                :timeout 30)))
-                  result))
-              (str "Service was not successfully deleted from the scheduler.")))))))
+(deftest ^:parallel ^:integration-fast test-delete-service
+  (testing-using-waiter-url
+    "test-delete-service"
+    (let [{:keys [service-id cookies]}
+          (make-request-with-debug-info {:x-waiter-name (rand-name)} #(make-kitchen-request waiter-url %))
+          router-id->router-url (routers waiter-url)]
+      (with-service-cleanup
+        service-id
+        (testing "service-known-on-all-routers"
+          (let [router-id->service-id
+                (pc/map-from-keys
+                  (fn [router-id]
+                    (wait-for
+                      (fn []
+                        (let [router-url (router-id->router-url router-id)
+                              {:keys [body]} (make-request router-url "/apps" :cookies cookies)]
+                          (->> (json/read-str (str body))
+                               (filter #(= service-id (get % "service-id")))
+                               first
+                               walk/keywordize-keys
+                               :service-id)))
+                      :interval 2 :timeout 30))
+                  (keys router-id->router-url))]
+            (is (every? #(= service-id (val %)) router-id->service-id)
+                (str "Cannot find service: " service-id " in at least one router: " router-id->service-id))))
+
+        (testing "delete service"
+          (is (wait-for
+                (fn []
+                  (-> (make-request waiter-url (str "/apps/" service-id) :method :delete)
+                      :status
+                      (= 200)))
+                :interval 5 :timeout 60)))
+
+        (testing "service-deleted-from-all-routers"
+          (let [router-id->service-id-deleted
+                (pc/map-from-keys
+                  (fn [router-id]
+                    (wait-for
+                      (fn []
+                        (let [router-url (router-id->router-url router-id)
+                              {:keys [body]} (make-request router-url "/apps" :cookies cookies)]
+                          (->> (json/read-str (str body))
+                               (filter #(= service-id (get % "service-id")))
+                               seq
+                               not)))
+                      :interval 2 :timeout 30))
+                  (keys router-id->router-url))]
+            (is (every? #(true? (val %)) router-id->service-id-deleted)
+                (str service-id " present in at least one router: " router-id->service-id-deleted))))))))

 (deftest ^:parallel ^:integration-fast test-suspend-resume
   (testing-using-waiter-url
@@ -468,43 +463,38 @@
       (is (str/includes? set-cookie "HttpOnly=true"))
       (is (= (System/getProperty "user.name") (str body))))))

-; Marked explicit due to:
-;   FAIL in (test-killed-instances)
-;   Not intersection between used and killed instances!
-;   expected: (not-empty (set/intersection all-instance-ids killed-instance-ids))
-;     actual: (not (not-empty #{}))
-(deftest ^:parallel ^:integration-slow ^:explicit test-killed-instances
+(deftest ^:parallel ^:integration-slow test-killed-instances
   (testing-using-waiter-url
     (let [headers {:x-waiter-name (rand-name)
-                   :x-waiter-max-instances 6
+                   :x-waiter-max-instances 5
                    :x-waiter-scale-up-factor 0.99
-                   :x-waiter-scale-down-factor 0.85
+                   :x-waiter-scale-down-factor 0.99
                    :x-kitchen-delay-ms 5000}
           _ (log/info "making canary request...")
           {:keys [service-id]} (make-request-with-debug-info headers #(make-kitchen-request waiter-url %))
           request-fn (fn [] (->> #(make-kitchen-request waiter-url %)
                                  (make-request-with-debug-info headers)
-                                 (:instance-id)))
-          _ (log/info "starting parallel requests")
-          all-instance-ids (->> request-fn
-                                (parallelize-requests 12 5)
-                                (set))
-          _ (parallelize-requests 1 5 request-fn)]
-      (log/info "waiting for at least one instance to get killed")
-      (is (wait-for #(let [service-settings (service-settings waiter-url service-id)
-                           killed-instance-ids (->> (get-in service-settings [:instances :killed-instances])
-                                                    (map :id)
-                                                    (set))]
-                       (pos? (count killed-instance-ids)))
-                    :interval 2 :timeout 30)
-          (str "No killed instances found for " service-id))
-      (let [service-settings (service-settings waiter-url service-id)
-            killed-instance-ids (->> (get-in service-settings [:instances :killed-instances]) (map :id) (set))]
-        (log/info "used instances (" (count all-instance-ids) "):" all-instance-ids)
-        (log/info "killed instances (" (count killed-instance-ids) "):" killed-instance-ids)
-        (is (not-empty (set/intersection all-instance-ids killed-instance-ids))
-            "Not intersection between used and killed instances!"))
-      (delete-service waiter-url service-id))))
+                                 :instance-id))]
+      (with-service-cleanup
+        service-id
+        (log/info "starting parallel requests")
+        (let [instance-ids-atom (atom #{})
+              instance-request-fn (fn []
+                                    (let [instance-id (request-fn)]
+                                      (swap! instance-ids-atom conj instance-id)))
+              instance-ids (->> (parallelize-requests 4 25 instance-request-fn
+                                                      :canceled? (fn [] (> (count @instance-ids-atom) 2))
+                                                      :service-id service-id)
+                                (reduce set/union))]
+          (is (> (count instance-ids) 1) (str instance-ids)))
+
+        (log/info "waiting for at least one instance to get killed")
+        (is (wait-for #(->> (get-in (service-settings waiter-url service-id) [:instances :killed-instances])
+                            (map :id)
+                            set
+                            seq)
+                      :interval 2 :timeout 45)
+            (str "No killed instances found for " service-id))))))

 (deftest ^:parallel ^:integration-fast test-basic-priority-support
   (testing-using-waiter-url
@@ -587,7 +577,7 @@
                 (make-request waiter-url "/state" :headers {"origin" "badorigin.com"} :method :post)]
             (is (= 403 status) response))
           (let [{:keys [status] :as response}
-                (make-request waiter-url "/state" :headers {"origin" "badorigin.com"} :method :options )]
+                (make-request waiter-url "/state" :headers {"origin" "badorigin.com"} :method :options)]
             (is (= 403 status) response)))))))

 (deftest ^:parallel ^:integration-fast test-error-handling


Renamed inputs in parsers

Renamed inputs in parsers

--- parser/parser.clj
+++ parser/parser.clj
@@ -37,17 +37,20 @@
      (match input
             (Pair _ offset) offset))

-(def range-between (start end)
+(def range-for-symbol (start end)
      (Range (offset-of start) (offset-of end)))

-(def parse-symbol (original-input)
-     (match (read-while atom-character? original-input)
-            (Pair input Empty) (ParseOut input)
-            (Pair input name)  (ParseNext input (Symbol name (range-between original-input input)))))
+(def parse-symbol (input)
+     (match (read-while atom-character? input)
+            (Pair next-input Empty) (ParseOut input)
+            (Pair next-input name)  (ParseNext next-input (Symbol name (range-for-symbol input next-input)))))

-(def parse-list (original-input parse-expressions)
-     (match (parse-expressions original-input Empty)
-            (Pair input expressions) (ParseNext input (List expressions (Range (- (offset-of original-input) 1) (offset-of input))))))
+(def range-for-list (start end)
+     (Range (- (offset-of start) 1) (offset-of end)))
+
+(def parse-list (input parse-expressions)
+     (match (parse-expressions input Empty)
+            (Pair next-input expressions) (ParseNext next-input (List expressions (range-for-list input next-input)))))

 (def parse-expression (input parse-expressions)
      (match input


Add keys for react

Add keys for react

--- src/javascript_externs_generator/ui.cljs
+++ src/javascript_externs_generator/ui.cljs
@@ -121,7 +121,7 @@
        [:span "Loaded Javascripts:"]
        [:ul
         (for [url @loaded-urls]
-          [:li url])]])))
+          [:li {:key url} url])]])))

 (defn externed-namespaces[]
   (let [externed-namespaces (rf/subscribe [:externed-namespaces])]
@@ -130,11 +130,11 @@
        [:span "Externed Namespaces:"]
        [:ul
         (for [namespace (keys @externed-namespaces)]
-          [:li [:span {:style {:color "blue"
-                               :text-decoration "underline"
-                               :cursor "pointer"}
-                       :on-click #(rf/dispatch [:show-namespace namespace])}
-                namespace]])]])))
+          [:li {:key namespace} [:span {:style {:color "blue"
+                                                :text-decoration "underline"
+                                                :cursor "pointer"}
+                                        :on-click #(rf/dispatch [:show-namespace namespace])}
+                                 namespace]])]])))

 (defn extern-generator []
   [:div


Fix transit dep on common-codec

Fix transit dep on common-codec

--- ext/transit/project.clj
+++ ext/transit/project.clj
@@ -8,4 +8,5 @@
             :url "https://opensource.org/licenses/MIT"}
   :pedantic? :abort
   :dependencies [[yada/core ~VERSION]
-                 [com.cognitect/transit-clj "0.8.297"]])
+                 [com.cognitect/transit-clj "0.8.313"]
+                 [com.cognitect/transit-java "0.8.337" :exclusions [commons-codec]]])


Clarify throttle doc-string (#751)

Clarify throttle doc-string (#751)

--- src/riemann/streams.clj
+++ src/riemann/streams.clj
@@ -1059,9 +1059,10 @@
            bottom-stream))))

 (defn throttle
-  "Passes on at most n events every dt seconds. If more than n events arrive in
-  a dt-second fixed window, drops remaining events. Imposes no additional
-  latency; events are either passed on immediately or dropped."
+  "Passes on at most n events, or vectors of events, every dt seconds. If more
+  than n events (or vectors) arrive in a dt-second fixed window, drops
+  remaining events. Imposes no additional latency; events are either passed on
+  immediately or dropped."
   [n dt & children]
   (part-time-simple
     dt


Add directional quaffing

Add directional quaffing

--- src/robinson/update.clj
+++ src/robinson/update.clj
@@ -1539,6 +1539,10 @@
                            :enter     [pick-up                :normal          true]}
                :eat       {:escape    [identity               :normal          false]
                            :else      [eat                    :normal          true]}
+               :quaff-adj {\h         [quaff-left             :normal          true]
+                           \j         [quaff-down             :normal          true]
+                           \k         [quaff-up               :normal          true]
+                           \l         [quaff-right            :normal          true]}
                :open      {\h         [open-left              :normal          true]
                            \j         [open-down              :normal          true]
                            \k         [open-up                :normal          true]


Improve test failures for missing test resources

--- test/comic_reader/sites_test.clj
+++ test/comic_reader/sites_test.clj
@@ -22,7 +22,8 @@

 (defn try-read-file [filename error-message]
   (try
-    (read-file filename)
+    (when filename
+      (read-file filename))
     (catch java.lang.RuntimeException re
       (is false
           (str "Contents of `" filename "'"
@@ -46,7 +47,8 @@
                               resource)]
     (if (resource-exists? resource-path)
       (io/resource resource-path)
-      nil)))
+      (is false (str "There must be a test resource file at `resources/"
+                     resource-path "'")))))

 (defn has-test-folder? []
   (some-> (site-test-folder)
@@ -169,29 +171,44 @@
           (extract-pages-list html chapter-url))
        (tu/display-dependent-data-values extract-pages-list))))

+(defmacro is-defined-in-file [data-symbol file-expr]
+  `(let [file# ~file-expr]
+     (when file#
+       (is ~data-symbol (str ~(keyword data-symbol)
+                             " must be defined in "
+                             file#)))))
+
 (defn test-image-page-extraction []
-  (let [results (try-read-file
-                 (site-test-resource "image.clj")
-                 (str "Please add a map with keys for :image-tag,"
-                      " :pages-list and :chapter-url."))]
+  (let [image-test-resource (site-test-resource "image.clj")
+        {:keys [image-tag pages-list chapter-url]}
+        (try-read-file
+         image-test-resource
+         (str "Please add a map with keys for :image-tag,"
+              " :pages-list and :chapter-url."))]
     (if-let [html (image-page-html)]
       (and
-       (test-extract-image-tag html (:image-tag results))
-       (test-extract-pages-list html
-                                (:pages-list results)
-                                (:chapter-url results)))
+       (is-defined-in-file image-tag (site-test-resource "image.clj"))
+       (test-extract-image-tag html image-tag)
+
+       (is-defined-in-file pages-list (site-test-resource "image.clj"))
+       (is-defined-in-file chapter-url (site-test-resource "image.clj"))
+       (test-extract-pages-list html pages-list chapter-url))
+
       (is false
           (str "There must be a sample image html page at "
                "`resources/test/" site-name "/image.html'")))))

 (defn test-extract-chapters-list []
-  (let [results (try-read-file
-                 (site-test-resource "chapter_list.clj")
-                 "Please add a map with a :chapter-list key.")]
+  (let [chapter-test-resource (site-test-resource "chapter_list.clj")
+        {:keys [chapter-list]}
+        (try-read-file
+         chapter-test-resource
+         "Please add a map with a :chapter-list key.")]
     (if-let [html (chapter-list-html)]
       (and
        (tu/ensure-dependencies-defined extract-chapters-list)
-       (is (= (:chapter-list results)
+       (is-defined-in-file chapter-list chapter-test-resource)
+       (is (= chapter-list
               (extract-chapters-list html ""))
            (tu/display-dependent-data-values extract-chapters-list)))
       (is false
@@ -199,13 +216,16 @@
                "at `resources/test/" site-name "/chapter_list.html'")))))

 (defn test-extract-comic-list []
-  (let [results (try-read-file
-                 (site-test-resource "comic_list.clj")
-                 "Please add a map with a :comic-list key.")]
+  (let [comic-test-resource (site-test-resource "comic_list.clj")
+        {:keys [comic-list]}
+        (try-read-file
+         comic-test-resource
+         "Please add a map with a :comic-list key.")]
     (if-let [html (comic-list-html)]
       (and
        (tu/ensure-dependencies-defined extract-comics-list)
-       (is (= (:comic-list results)
+       (is-defined-in-file comic-list comic-test-resource)
+       (is (= comic-list
               (extract-comics-list html))
            (tu/display-dependent-data-values extract-comics-list)))
       (is false


Resize method config name editor text box

--- src/cljs/main/broadfcui/page/workspace/method_configs/method_config_editor.cljs
+++ src/cljs/main/broadfcui/page/workspace/method_configs/method_config_editor.cljs
@@ -201,7 +201,9 @@
         (create-section
          (if editing?
            [:div {}
-            (style/create-text-field {:ref "confname" :style {:width "100%"}
+            (style/create-text-field {:ref "confname" :style {:maxWidth 500
+                                                              :width "100%"
+                                                              :fontSize "100%"}
                                       :data-test-id "edit-method-config-name-input"
                                       :defaultValue (:name config)
                                       :onKeyDown (common/create-key-handler [:space] #(.preventDefault %))})


Use common compressor streams in fastq

Use common compressor streams in fastq

--- src/cljam/fastq.clj
+++ src/cljam/fastq.clj
@@ -1,10 +1,7 @@
 (ns cljam.fastq
   (:require [clojure.java.io :as io]
-            [clojure.string :as string])
-  (:import java.io.Writer
-           [java.io BufferedReader BufferedWriter InputStreamReader OutputStreamWriter]
-           [java.util.zip GZIPInputStream GZIPOutputStream]
-           [org.apache.commons.compress.compressors.bzip2 BZip2CompressorInputStream BZip2CompressorOutputStream]))
+            [clojure.string :as string]
+            [cljam.util :as util]))

 (deftype FASTQReader [reader f]
   java.io.Closeable
@@ -18,26 +15,16 @@

 (defn ^FASTQReader reader [^String f]
   (let [file (io/file f)
-        path (.getAbsolutePath file)
-        basename (.getName file)]
-    (-> (condp re-find basename
-          #"\.(gz|GZ|gzip|GZIP)$"
-          (-> (io/input-stream path) GZIPInputStream. InputStreamReader. BufferedReader.)
-          #"\.(bz2|BZ2|bzip2|BZIP2)$"
-          (-> (io/input-stream path) BZip2CompressorInputStream. InputStreamReader. BufferedReader.)
-          (io/reader path))
+        path (.getAbsolutePath file)]
+    (-> (util/compressor-input-stream path)
+        io/reader
         (FASTQReader. path))))

 (defn ^FASTQWriter writer [^String f]
   (let [file (io/file f)
-        path (.getAbsolutePath file)
-        basename (.getName file)]
-    (-> (condp re-find basename
-          #"\.(gz|GZ|gzip|GZIP)$"
-          (-> (io/output-stream path) GZIPOutputStream. OutputStreamWriter. BufferedWriter.)
-          #"\.(bz2|BZ2|bzip2|BZIP2)$"
-          (-> (io/output-stream path) BZip2CompressorOutputStream. OutputStreamWriter. BufferedWriter.)
-          (io/writer path :encoding "UTF-8"))
+        path (.getAbsolutePath file)]
+    (-> (util/compressor-output-stream path)
+        io/writer
         (FASTQWriter. path))))

 (defrecord FASTQRead [^String name ^String sequence quality])


updating message

updating message

--- src/cljs/forms.cljs
+++ src/cljs/forms.cljs
@@ -8,9 +8,7 @@
 (def create-team
   {:fields [{:name :team_name}]
    :validations [[:required [:team_name]]
-                 [:matches #"[\w+|_?]*-\d+"
-                           :team_name
-                           "Team name must be one or more words separated by underscores trailed by a hyphen separated number"]]
+                 [:matches #"[\w+|_?]*-\d+" :team_name "Team name must be one or more words separated by underscores trailed by a hyphen separated number"]]
    :renderer :bootstrap3-stacked})

 (def update-weight


Revert "CMR-2920 Fix typo in the mock urs avaiulability endpoint"

This reverts commit 46033f4e891d1e45999757e79f77904c121fad33.

--- mock-echo-app/src/cmr/mock_echo/api/urs.clj
+++ mock-echo-app/src/cmr/mock_echo/api/urs.clj
@@ -133,8 +133,6 @@
 (defn build-routes [system]
   (routes
     (context "/urs" []
-      ;;availability endpoint
-      (GET "/" [] {:status 200})

       (POST "/login" {:keys [request-context body] :as request}
         (assert-urs-basic-auth-info request)


Exercise 3.3, 3.4

Exercise 3.3, 3.4

--- src/sicp/chapter3_1.clj
+++ src/sicp/chapter3_1.clj
@@ -37,8 +37,9 @@
                    (case m
                      :withdraw withdraw
                      :deposit deposit
-                     (throw (Exception. (str "Unknown request -- make-account "
-                                             m)))))]
+                     (throw (IllegalArgumentException.
+                             (str "Unknown request -- make-account "
+                                  m)))))]
     dispatch))

 ;; Exercise 3.1
@@ -46,7 +47,6 @@
   (let [sum (atom init)]
     (fn [n]
       (swap! sum + n))))
-

 ;; Exercise 3.2
 (defn make-monitored [f]
@@ -57,3 +57,67 @@
         :reset-count (reset! cnt 0)
         (do (swap! cnt inc)
             (f x))))))
+
+;; Exercise 3.3
+(defn make-account' [balance password]
+  (let [balance (atom balance)
+        withdraw (fn [amount]
+                   (if (>= @balance amount)
+                     (swap! balance - amount)
+                     "Insufficient funds"))
+        deposit (fn [amount]
+                  (swap! balance + amount))
+        exec-if-correct (fn [pass f]
+                          (fn [amount]
+                            (if (= pass password)
+                              (f amount)
+                              "Incorrect password")))
+        dispatch (fn [pass m]
+                   (case m
+                     :withdraw (exec-if-correct pass withdraw)
+                     :deposit (exec-if-correct pass deposit)
+                     (throw (IllegalArgumentException.
+                             (str "Unknown request -- make-account "
+                                  m)))))]
+    dispatch))
+
+;; Exercise 3.4
+(defn call-the-cops []
+  "Calling the cops...")
+
+(defn make-account'' [balance password]
+  (let [balance (atom balance)
+        withdraw (fn [amount]
+                   (if (>= @balance amount)
+                     (swap! balance - amount)
+                     "Insufficient funds"))
+        deposit (fn [amount]
+                  (swap! balance + amount))
+        incorrect-cnt (atom 0)
+        exec-if-correct (fn [pass f]
+                          (fn [amount]
+                            (if (= pass password)
+                              (do (reset! incorrect-cnt 0)
+                                  (f amount))
+                              (do (swap! incorrect-cnt inc)
+                                  (if (> @incorrect-cnt 7)
+                                    (call-the-cops)
+                                    "Incorrect password")))))
+        dispatch (fn [pass m]
+                   (case m
+                     :withdraw (exec-if-correct pass withdraw)
+                     :deposit (exec-if-correct pass deposit)
+                     (throw (IllegalArgumentException.
+                             (str "Unknown request -- make-account "
+                                  m)))))]
+    dispatch))
+
+;;; 3.1.2  The Benefits of Introducing Assignment
+
+;; Exercise 3.5
+
+
+;; Exercise 3.6
+
+
+;;; 3.1.3  The Costs of Introducing Assignment