                                 (let [saved-model (-> new-state
                                                       (assoc-in [::debugger :highlighted-signal-id] nil)
                                                       (update-in [::debugger :action-events] #(filter :for-replay? %))
-                                                      -remove-orphaned-signals)]
+                                                      -remove-dangling-signals)]
                                   (assoc! storage storage-key saved-model)))))
 
                  ; now start app as usual


    @result))

(defn ^:no-doc -remove-orphaned-signals
  "Orphaned signal has no actions and no orphaned child signals."
  [model]
  (let [kept-ids (-signals-with-actions model)
        signal-events (-> model ::debugger :signal-events)

           ::vacuum
           (-> model
               (update-in [::debugger :action-events] #(filter :enabled? %))
               -remove-dangling-signals)

           ::clear
           (-> model
