                ::on-toggle-persist
                (dispatch-action ::toggle-persist)
 
-               ::on-sweep
-               (dispatch-action ::sweep)
-
-               ::on-sweep-all
-               (dispatch-action ::sweep-all)
+               ::on-vacuum
+               (dispatch-action ::vacuum)
+
+               ::on-clear
+               (dispatch-action ::clear)
 
                ::on-reset
                (do

           ::toggle-persist
           (update-in model [::debugger :persist?] not)

           ::sweep
           (as-> model m
                 (update-in m [::debugger :action-events] #(filter :enabled? %))
                 (update-in m [::debugger :signal-events] #(remove (partial -orphaned-signal? m) %)))

           ::sweep-all
           (-> model
               (assoc-in [::debugger :signal-events] nil)
               (assoc-in [::debugger :action-events] nil))

                                  :checked   persist?
                                  :on-change #(dispatch ::on-toggle-persist)}]
   [:label {:for "persist-toggle"} "Persist"]
   [-menu-button "Vacuum" #(dispatch ::on-vacuum) "Removes disabled actions and signals with no actions from history"]
   [-menu-button "Clear" #(dispatch ::on-clear) "Clears debugger history"]
   [-menu-button "Reset" #(dispatch ::on-reset) "Removes all actions and signals resetting the model to initial state"]
   [-menu-button "Hide" #(dispatch ::on-toggle-visibility) (str "Hides debugger view (" toggle-visibility-shortcut ")")]
   [-menu-button "Save" #(dispatch ::on-save) "Saves current debugger session into file"]
