From bda9092ceff69accc8ea201fe3c96a8ddfea2dfe Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Wed, 4 Nov 2015 10:44:28 -0800
Subject: [PATCH] urls: Fix unit tests for linked-hash change

---
 basis/urls/urls-tests.factor | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/basis/urls/urls-tests.factor b/basis/urls/urls-tests.factor
index 9de547848f..0a934469ef 100644
--- a/basis/urls/urls-tests.factor
+++ b/basis/urls/urls-tests.factor
@@ -1,6 +1,6 @@
+USING: accessors arrays assocs io.sockets io.sockets.secure
+kernel linked-assocs present prettyprint tools.test urls ;
 IN: urls.tests
-USING: io.sockets io.sockets.secure urls urls.private tools.test prettyprint
-arrays kernel assocs present accessors ;
 
 CONSTANT: urls
     {
@@ -10,7 +10,7 @@ CONSTANT: urls
                 { host "www.apple.com" }
                 { port 1234 }
                 { path "/a/path" }
-                { query H{ { "a" "b" } } }
+                { query LH{ { "a" "b" } } }
                 { anchor "foo" }
             }
             "http://www.apple.com:1234/a/path?a=b#foo"
@@ -20,7 +20,7 @@ CONSTANT: urls
                 { protocol "http" }
                 { host "www.apple.com" }
                 { path "/a/path" }
-                { query H{ { "a" "b" } } }
+                { query LH{ { "a" "b" } } }
                 { anchor "foo" }
             }
             "http://www.apple.com/a/path?a=b#foo"
@@ -57,7 +57,7 @@ CONSTANT: urls
         {
             T{ url
                 { path "bar" }
-                { query H{ { "a" "b" } } }
+                { query LH{ { "a" "b" } } }
             }
             "bar?a=b"
         }
@@ -85,7 +85,7 @@ CONSTANT: urls
                { protocol "http" }
                { host "foo.com" }
                { path "/" }
-               { query H{ { "a" f } } }
+               { query LH{ { "a" f } } }
             }
             "http://foo.com/?a"
         }
@@ -246,7 +246,7 @@ urls [
     T{ url
         { protocol "http" }
         { host "localhost" }
-        { query H{ { "foo" "bar" } } }
+        { query LH{ { "foo" "bar" } } }
         { path "/" }
     }
 }
@@ -256,7 +256,7 @@ urls [
     T{ url
         { protocol "http" }
         { host "localhost" }
-        { query H{ { "foo" "bar" } } }
+        { query LH{ { "foo" "bar" } } }
         { path "/" }
     }
 }