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

[factor.git] / basis / ui / tools / error-list / error-list.factor

diff --git a/basis/ui/tools/error-list/error-list.factor b/basis/ui/tools/error-list/error-list.factor
index 0ac48742e558d3a22a8aedaf7cc7c4c1b0fd5e1f..05a1ead5249d6751c133e711525418b2d16f279a 100644 (file)
--- a/basis/ui/tools/error-list/error-list.factor
+++ b/basis/ui/tools/error-list/error-list.factor
@@ -204,7 +204,7 @@ M: error-list-updater errors-changed
 
 \ show-error-list H{ { +nullary+ t } } define-command
 
-[
+STARTUP-HOOK: [
     f <model> 100 milliseconds <delay> error-list-model set-global
     error-list-updater add-error-observer
-] "ui.tools.error-list" add-startup-hook
+]