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

[factor.git] / basis / vocabs / refresh / monitor / monitor.factor

diff --git a/basis/vocabs/refresh/monitor/monitor.factor b/basis/vocabs/refresh/monitor/monitor.factor
index 3186c2e352e743c18585f25cf9ef99399a08e4e7..6e72df2b158d7c55a1d4eacd3ec5080743572c56 100644 (file)
--- a/basis/vocabs/refresh/monitor/monitor.factor
+++ b/basis/vocabs/refresh/monitor/monitor.factor
@@ -65,7 +65,7 @@ TR: convert-separators "/\\" ".." ;
     HS{ } clone changed-vocabs set-global
     loaded-vocab-names [ changed-vocab ] each ;
 
-[
+STARTUP-HOOK: [
     "-no-monitors" (command-line) member? [
         [ drop ] add-vocab-root-hook set-global
         f changed-vocabs set-global
@@ -74,4 +74,4 @@ TR: convert-separators "/\\" ".." ;
         vocab-roots get [ start-vocab-monitor ] each
         [ start-vocab-monitor ] add-vocab-root-hook set-global
     ] if
-] "vocabs.refresh.monitor" add-startup-hook
+]