X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fwindows%2Fdirectx%2Fdinput%2Fconstants%2Fconstants.factor;fp=basis%2Fwindows%2Fdirectx%2Fdinput%2Fconstants%2Fconstants.factor;h=5d95d6ae937cf4c5617d8c4d7908fde7e6b6bfd2;hp=f7ab901417d80bf20d438ee6afd6980a8b9ec6a8;hb=288d7e4a7aecc6dc0cd53656c26caf72a872fe2c;hpb=f0990505f248a9a3ed04824033e2bf82737a076d

diff --git a/basis/windows/directx/dinput/constants/constants.factor b/basis/windows/directx/dinput/constants/constants.factor
index f7ab901417..5d95d6ae93 100644
--- a/basis/windows/directx/dinput/constants/constants.factor
+++ b/basis/windows/directx/dinput/constants/constants.factor
@@ -832,7 +832,7 @@ MACRO: <DIDATAFORMAT> ( dwFlags dwDataSize struct rgodf-array -- alien )
     define-guid-constants
     define-format-constants ;
 
-[ define-constants ] "windows.directx.dinput.constants" add-startup-hook
+STARTUP-HOOK: define-constants
 
 : uninitialize ( variable quot -- )
     '[ _ when* f ] change-global ; inline