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

[factor.git] / core / vocabs / loader / loader.factor

diff --git a/core/vocabs/loader/loader.factor b/core/vocabs/loader/loader.factor
index 5c24341c45a2c0b35f890b6d8908e89a9548910e..5814657aee82d36edf24ed973a5ab1ee7fbc4c0b 100644 (file)
--- a/core/vocabs/loader/loader.factor
+++ b/core/vocabs/loader/loader.factor
@@ -16,11 +16,10 @@ CONSTANT: default-vocab-roots {
     "resource:work"
 }
 
-[
+STARTUP-HOOK: [
     default-vocab-roots V{ } like vocab-roots set-global
-
     [ drop ] add-vocab-root-hook set-global
-] "vocabs.loader" add-startup-hook
+]
 
 : add-vocab-root ( root -- )
     trim-tail-separators dup vocab-roots get ?adjoin