From f5a6fe62a612c0727063fa9e530d53ddda5fcd82 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 6 May 2018 02:01:02 -0400
Subject: - Removed "lux text upper" and "lux text lower" procedures.

---
 stdlib/test/test/lux/data/text.lux |  8 --------
 stdlib/test/tests.lux              | 10 +++++-----
 2 files changed, 5 insertions(+), 13 deletions(-)

(limited to 'stdlib/test')

diff --git a/stdlib/test/test/lux/data/text.lux b/stdlib/test/test/lux/data/text.lux
index 42685e03f..2430c9919 100644
--- a/stdlib/test/test/lux/data/text.lux
+++ b/stdlib/test/test/lux/data/text.lux
@@ -123,14 +123,6 @@
                        (&.replace-all sep1 sep2 sample1)))
             ))))
 
-(context: "Other text functions"
-  (let [(^open "&/") &.Eq<Text>]
-    ($_ seq
-        (test "Can transform texts in certain ways."
-              (and (&/= "abc" (&.lower-case "ABC"))
-                   (&/= "ABC" (&.upper-case "abc"))))
-        )))
-
 (context: "Structures"
   (let [(^open "&/") &.Order<Text>]
     ($_ seq
diff --git a/stdlib/test/tests.lux b/stdlib/test/tests.lux
index d4a0c0a32..694ada1c5 100644
--- a/stdlib/test/tests.lux
+++ b/stdlib/test/tests.lux
@@ -35,10 +35,13 @@
                    ["_." maybe]
                    ["_." product]
                    ["_." sum]
-                   ["_." text]
                    ["_." number]
                    (number ["_." ratio]
                            ["_." complex])
+                   ["_." text]
+                   (text ["_." format]
+                         ["_." lexer]
+                         ["_." regex])
                    (format ["_." json]
                            ["_." xml])
                    (coll ["_." array]
@@ -54,10 +57,7 @@
                          ["_." queue]
                          (queue ["_." priority])
                          (tree ["_." rose]
-                               (rose ["_." zipper])))
-                   (text ["_." format]
-                         ["_." lexer]
-                         ["_." regex]))
+                               (rose ["_." zipper]))))
              ["_." math]
              (math ["_." random]
                    ["_." modular]
-- 
cgit v1.2.3