fixed warnings.

src/cljs/auto_ap/status.cljs

@@ -109,7 +109,7 @@
 (re-frame/reg-event-db
  ::completed
  [(re-frame/path [::status]) ]
- (fn [db [_ single which]]
+ (fn [db [_ single _]]
    (assoc db single {:state nil
                      :error nil})))
 
@@ -135,21 +135,19 @@
         info-states
         (->> states (filter #(:info %)))]
     [:<> 
-     (if (seq error-states)
+     (when (seq error-states)
        [:div.notification.is-danger.is-light
         (for [state states
               state (:error state)]
-          (do 
-            ^{:key (:message state)}
-            [:p (or (:message state)
-                    (:error state)
-                    "An unexpected error occured.")]))])
-     (if (seq info-states)
+          ^{:key (:message state)}
+          [:p (or (:message state)
+                  (:error state)
+                  "An unexpected error occured.")])])
+     (when (seq info-states)
        [:div.notification.is-info.is-light
         (for [state states]
-          (do 
-            ^{:key (:info state)}
-            [:p (:info state)]))])]))
+          ^{:key (:info state)}
+          [:p (:info state)])])]))
 
 (defn big-loader [status]
   (when (= :loading (:state status))