core/basis/extra: using STARTUP-HOOK: and SHUTDOWN-HOOK:

[factor.git] / extra / audio / gadget / gadget.factor

diff --git a/extra/audio/gadget/gadget.factor b/extra/audio/gadget/gadget.factor
index 7ef80c93406cab66c8266042c0efd2cdb025724a..dbf194ba323a6038e53dcbba2d1489db622b0f69 100644 (file)
--- a/extra/audio/gadget/gadget.factor
+++ b/extra/audio/gadget/gadget.factor
@@ -16,11 +16,11 @@ CONSTANT: pause-label-image-path "vocab:audio/gadget/pause.png"
 
 SYMBOLS: play-label-image pause-label-image gadget-audio-engine ;
 
-[
+STARTUP-HOOK: [
     f play-label-image set-global
     f pause-label-image set-global
     f gadget-audio-engine set-global
-] "audio.gadget" add-startup-hook
+]
 
 : initialize-audio-gadgets ( -- )
     gadget-audio-engine get-global [