                             (-update-action-event m id assoc :result (dissoc m ::debugger))))
                new-model))
 
-           ::toggle-persist
-           (update-in model [::debugger :persist?] not)
+           ::toggle-replay-mode
+           (update-in model [::debugger :replay-mode?] not)
 
            ::vacuum
            (as-> model m

        body))

(defn -view
  [{:keys [visible? toggle-visibility-shortcut persist? initial-model signal-events action-events]}
   dispatch]
  [-overlay
   [-resizable-div {:style {:display          (if @visible? "block" "none") ; using CSS instead of React in order to persist resized frame on toggling visibility

                                             :result    {schema/Any schema/Any}}]
               :next-action-id             schema/Int

               :replay-mode?               schema/Bool

               :visible?                   schema/Bool
               :toggle-visibility-shortcut schema/Str}
