From 227e9d66728ba90352aaed68c3c18eac1fb8d3ba Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sat, 4 Aug 2018 11:12:54 -0400
Subject: [PATCH] dns: Remove evil platform files.

---
 extra/dns/dns.factor             | 9 +++++++--
 extra/dns/unix/authors.txt       | 1 -
 extra/dns/unix/platforms.txt     | 1 -
 extra/dns/unix/unix.factor       | 7 -------
 extra/dns/windows/authors.txt    | 1 -
 extra/dns/windows/platforms.txt  | 1 -
 extra/dns/windows/windows.factor | 6 ------
 7 files changed, 7 insertions(+), 19 deletions(-)
 delete mode 100644 extra/dns/unix/authors.txt
 delete mode 100644 extra/dns/unix/platforms.txt
 delete mode 100644 extra/dns/unix/unix.factor
 delete mode 100644 extra/dns/windows/authors.txt
 delete mode 100644 extra/dns/windows/platforms.txt
 delete mode 100644 extra/dns/windows/windows.factor

diff --git a/extra/dns/dns.factor b/extra/dns/dns.factor
index 2c637017ff..f22f22794f 100644
--- a/extra/dns/dns.factor
+++ b/extra/dns/dns.factor
@@ -409,11 +409,16 @@ M: TXT rdata>byte-array
 HOOK: initial-dns-servers os ( -- sequence )
 
 <WINDOWS
-    USE: dns.windows
+USING: windows.iphlpapi ;
+
+M: windows initial-dns-servers dns-server-ips ;
 WINDOWS>
 
 <UNIX
-    USE: dns.unix
+USING: resolv-conf ;
+
+M: unix initial-dns-servers
+    default-resolv.conf nameserver>> ;
 UNIX>
 
 : with-dns-servers ( servers quot -- )
diff --git a/extra/dns/unix/authors.txt b/extra/dns/unix/authors.txt
deleted file mode 100644
index 7c1b2f2279..0000000000
--- a/extra/dns/unix/authors.txt
+++ /dev/null
@@ -1 +0,0 @@
-Doug Coleman
diff --git a/extra/dns/unix/platforms.txt b/extra/dns/unix/platforms.txt
deleted file mode 100644
index 509143d863..0000000000
--- a/extra/dns/unix/platforms.txt
+++ /dev/null
@@ -1 +0,0 @@
-unix
diff --git a/extra/dns/unix/unix.factor b/extra/dns/unix/unix.factor
deleted file mode 100644
index 31af530f5c..0000000000
--- a/extra/dns/unix/unix.factor
+++ /dev/null
@@ -1,7 +0,0 @@
-! Copyright (C) 2010 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-USING: accessors dns resolv-conf system ;
-IN: dns.unix
-
-M: unix initial-dns-servers
-    default-resolv.conf nameserver>> ;
diff --git a/extra/dns/windows/authors.txt b/extra/dns/windows/authors.txt
deleted file mode 100644
index 7c1b2f2279..0000000000
--- a/extra/dns/windows/authors.txt
+++ /dev/null
@@ -1 +0,0 @@
-Doug Coleman
diff --git a/extra/dns/windows/platforms.txt b/extra/dns/windows/platforms.txt
deleted file mode 100644
index 8e1a55995e..0000000000
--- a/extra/dns/windows/platforms.txt
+++ /dev/null
@@ -1 +0,0 @@
-windows
diff --git a/extra/dns/windows/windows.factor b/extra/dns/windows/windows.factor
deleted file mode 100644
index 9c111c6316..0000000000
--- a/extra/dns/windows/windows.factor
+++ /dev/null
@@ -1,6 +0,0 @@
-! Copyright (C) 2010 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-USING: dns system windows.iphlpapi ;
-IN: dns.windows
-
-M: windows initial-dns-servers dns-server-ips ;