Made admin clients easier to work with.

src/cljs/auto_ap/views/utils.cljs

@@ -118,6 +118,14 @@
 (def css-transition-group
   (reagent/adapt-react-class react-transition-group/CSSTransition))
 
+(def transition
+  (reagent/adapt-react-class react-transition-group/Transition))
+
+(def transition-group
+  (reagent/adapt-react-class react-transition-group/TransitionGroup))
+
+(def switch-transition
+  (reagent/adapt-react-class react-transition-group/SwitchTransition))
 
 (defn appearing [{:keys [visible? enter-class exit-class timeout]}]
   (let [final-state (reagent/atom visible?)]
@@ -140,15 +148,18 @@
                          value
                          (conj value {:key (random-uuid)
                                       :new? true}))]
-        [:div
+        [:div {:style {:margin-bottom "1em"}}
          (for [[i override] (map vector (range) value)
                :let [is-disabled? (if (= false allow-change?)
                                     (not (boolean (:new? override)))
                                     nil)]
                ]
            ^{:key (:key override)}
-           [:div.level
-            [:div.level-left
+           [:div.level 
+            [:div.level-left {:style (when (and (= i (dec (count value)))
+                                                (:new? override))
+                                       {:background "#EEE"
+                                        :padding "0.25em 1em 0.25em 0em"})}
              [:div.level-item
               (if (:new? override)
                 
@@ -187,7 +198,7 @@
                                                       @value-repr))))])
               ]
              (when-not disable-remove? 
-               [:div.level-item
+               [:div.level-item 
                 [:a.button.level-item
                  {:disabled is-disabled?
                   :on-click (fn []