diff --git a/extra/dns/dns.factor b/extra/dns/dns.factor
index 08f70c3700..2c637017ff 100644
--- a/extra/dns/dns.factor
+++ b/extra/dns/dns.factor
@@ -408,10 +408,13 @@ M: TXT rdata>byte-array
 
 HOOK: initial-dns-servers os ( -- sequence )
 
-{
-    { [ os windows? ] [ "dns.windows" ] }
-    { [ os unix? ] [ "dns.unix" ] }
-} cond require
+<WINDOWS
+    USE: dns.windows
+WINDOWS>
+
+<UNIX
+    USE: dns.unix
+UNIX>
 
 : with-dns-servers ( servers quot -- )
     [ dns-servers ] dip with-variable ; inline