✨ Improvements on backend application initialization.

On repl and on production environment.

backend/src/uxbox/main.clj

@@ -16,17 +16,18 @@
   (let [m (System/getProperty "uxbox.enable-asserts")]
     (or (nil? m) (= "true" m))))
 
-;; Set value for current thread binding.
-(set! *assert* (enable-asserts nil))
-
 ;; Set value for all new threads bindings.
 (alter-var-root #'*assert* enable-asserts)
 
+;; Set value for current thread binding.
+(set! *assert* (enable-asserts nil))
+
 ;; --- Entry point
 
 (defn -main
   [& args]
-  (load "uxbox/config"
-        "uxbox/migrations"
-        "uxbox/http")
+  (require 'uxbox.config
+           'uxbox.migrations
+           'uxbox.http
+           'uxbox.tasks)
   (mount/start))

backend/src/uxbox/tasks.clj

@@ -21,6 +21,7 @@
    [uxbox.tasks.demo-gc]
    [uxbox.tasks.sendmail]
    [uxbox.tasks.impl :as impl]
+   [uxbox.util.time :as dt]
    [vertx.core :as vc]
    [vertx.timers :as vt]))
 
@@ -49,7 +50,7 @@
 
 (def ^:private schedule
   [{:id "every 1 hour"
-    :cron #uxbox/cron "1 1 */1 * * ? *"
+    :cron (dt/cron "1 1 */1 * * ? *")
     :fn #'uxbox.tasks.demo-gc/handler
     :props {:foo 1}}])