 (defn active! [obj]
   (when (and obj
              (::tabset @obj))
-    (object/merge! (::tabset @obj) {:active-obj obj})
+    (object/merge! (::tabset @obj) {:active-obj obj
+                                    :no-redraw false})
     (object/raise obj :show)
     (ensure-visible (->index obj) (::tabset @obj))))
 

          aidx (->index active)]
      (remove-watch obj :tabs)
      (object/merge! obj {::tabset nil})
      (object/merge! cur-tabset {:objs (vec (remove #(= obj %) (@cur-tabset :objs)))})
      (if (= obj active)
        (object/raise cur-tabset :tab idx)
        (when (not= aidx (->index active))

              (map #(dom/attr % :pos) children))
        prev-active (:active-obj @multi)]
    (object/merge! multi {:objs (mapv (:objs @multi) ser)
                          :active-obj nil
                          :no-redraw false})
    (active! prev-active)
    ))

