always compile in withCancel

2025-09-22 16:21:27 -05:00
parent 42e393bd9c
commit 4916a6d24e
2 changed files with 673 additions and 217 deletions
--- a/src/hollywoo/Movie.hx
+++ b/src/hollywoo/Movie.hx
--- a/src/hollywoo/Movie.kiss
+++ b/src/hollywoo/Movie.kiss
@@ -607,6 +607,10 @@
                (cc)
            }))

+    (prop CANCEL_COMMAND "CANCEL CHOICE")
+    (method withCancel [choices]
+        (.concat [CANCEL_COMMAND] choices))
+
    (defNew
        [
            // "View" in the Model-View-Controller architecture:
@@ -710,10 +714,6 @@
                        }))
                (shortcutHandler.registerItem "[d]efine [d]elay" redefineLastDelay)

-                (prop CANCEL_COMMAND "CANCEL CHOICE")
-                (method withCancel [choices]
-                    (.concat [CANCEL_COMMAND] choices))
-
                (shortcutHandler.registerItem "[d]efine [m]isc [i]nt"
                    ->cc
                        (unless doingSomething (set doingSomething true)