fix #52

Changed dec-by to use remove-tail (`counterfield = counterfield - x`
instead of `counterfield = x - counterfield`)

CHANGELOG.md

@@ -1,5 +1,9 @@
 # Changelog
 
+## 4.0.2
+
+* Changed dec-by to use remove-tail (`counterfield = counterfield - x` instead of `counterfield = x - counterfield`)
+
 ## 4.0.0-beta*
 
 * Internals changes that should make query generation 2x 3x faster and

project.clj

@@ -1,4 +1,4 @@
-(defproject cc.qbits/hayt "4.0.1"
+(defproject cc.qbits/hayt "4.0.2"
   :description "CQL Query Generation"
   :url "https://github.com/mpenet/hayt"
   :license {:name "Eclipse Public License"

src/clj/qbits/hayt/utils.clj

@@ -106,7 +106,7 @@ ex:    (select :foo (where [[contains :foo  ...]]]))"
 
 (def dec-by
   "Decrement counter by x, usable in `values` and `set-columns`"
-  remove-head)
+  remove-tail)
 
 (def prepend
   "Prepend element to List"

test/qbits/hayt/core_test.clj

@@ -174,7 +174,18 @@
    "UPDATE foo SET baz = ['prepended'] + baz WHERE foo = 'bar';"
    (update :foo
            (set-columns {:baz [["prepended"] +]})
-           (where [[:foo "bar"]]))))
+           (where [[:foo "bar"]]))
+
+   "UPDATE foo SET baz = baz + 1 WHERE foo = 'bar';"
+   (update :foo
+           (set-columns {:baz (inc-by 1)})
+           (where [[:foo "bar"]]))
+
+   "UPDATE foo SET baz = baz - 1 WHERE foo = 'bar';"
+   (update :foo
+           (set-columns {:baz (dec-by 1)})
+           (where [[:foo "bar"]]))
+    ))
 
 (deftest test-delete