aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorIvar Refsdal <refsdal.ivar@gmail.com>2022-03-29 11:28:44 +0200
committerIvar Refsdal <refsdal.ivar@gmail.com>2022-03-29 11:28:44 +0200
commit5df374a5abd25eff5ebabe3c4605d3fb704a5af7 (patch)
tree7886474760c294906f0805cfa1f44b2a9d8eea3f /src
parentRelease 0.2.54 (diff)
downloadfiinha-5df374a5abd25eff5ebabe3c4605d3fb704a5af7.tar.gz
fiinha-5df374a5abd25eff5ebabe3c4605d3fb704a5af7.tar.xz
Release 0.2.55\nSet version numbers for change log
... Write new release script Write new release script Write new release script Release 0.2.55 Try squashing release ... Try squashing release ...
Diffstat (limited to 'src')
-rw-r--r--src/com/github/ivarref/yoltq.clj5
-rw-r--r--src/com/github/ivarref/yoltq/migrate.clj3
2 files changed, 8 insertions, 0 deletions
diff --git a/src/com/github/ivarref/yoltq.clj b/src/com/github/ivarref/yoltq.clj
index 7d5434e..bb7a43e 100644
--- a/src/com/github/ivarref/yoltq.clj
+++ b/src/com/github/ivarref/yoltq.clj
@@ -160,6 +160,11 @@
:healthy?
(deref)))
+(defn unhealthy?
+ "Returns `true` if there are queues in error, otherwise `false`."
+ []
+ (false? (healthy?)))
+
(defn queue-stats []
(let [{:keys [conn]} @*config*
db (d/db conn)]
diff --git a/src/com/github/ivarref/yoltq/migrate.clj b/src/com/github/ivarref/yoltq/migrate.clj
index 6313b73..c97f679 100644
--- a/src/com/github/ivarref/yoltq/migrate.clj
+++ b/src/com/github/ivarref/yoltq/migrate.clj
@@ -56,3 +56,6 @@
(defn migrate! [cfg]
(to->v2 cfg))
+
+(comment
+ (migrate! @com.github.ivarref.yoltq/*config*))