add theme tests

Author: sprocketc

test/app_test.cljs

@@ -41,7 +41,6 @@
      (rf/dispatch [::e/toggle-grid])
      (is @grid-visible))))
 
-
 (deftest panel
   (rf-test/run-test-sync
    (rf/dispatch [::e/initialize-db])

test/theme_test.cljs

@@ -0,0 +1,25 @@
+(ns theme-test
+  (:require
+   [cljs.test :refer-macros [deftest is]]
+   [day8.re-frame.test :as rf-test]
+   [re-frame.core :as rf]
+   [renderer.app.events :as app.e]
+   [renderer.theme.events :as e]
+   [renderer.theme.subs :as s]))
+
+(deftest mode
+  (rf-test/run-test-sync
+   (rf/dispatch [::app.e/initialize-db])
+   (rf/dispatch [::e/set-native-mode :light])
+
+   (let [theme-mode (rf/subscribe [::s/mode])]
+     (is (= :dark @theme-mode))
+
+     (rf/dispatch [::e/cycle-mode])
+     (is (= :light @theme-mode))
+
+     (rf/dispatch [::e/cycle-mode])
+     (is (= :system @theme-mode))
+
+     (rf/dispatch [::e/cycle-mode])
+     (is (= :dark @theme-mode)))))