From 374ccf07246484eb7beb2cd87f3fc88396373ee1 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 20 Aug 2021 03:12:49 -0400
Subject: More fixes.

---
 stdlib/source/test/lux/data/text.lux | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

(limited to 'stdlib/source/test')

diff --git a/stdlib/source/test/lux/data/text.lux b/stdlib/source/test/lux/data/text.lux
index 51849d1af..832c5a094 100644
--- a/stdlib/source/test/lux/data/text.lux
+++ b/stdlib/source/test/lux/data/text.lux
@@ -89,37 +89,37 @@
                  (let [full (\ /.monoid compose inner outer)]
                    (and (/.contains? inner full)
                         (/.contains? outer full))))
-        (_.cover [/.index_of]
-                 (and (|> (/.index_of inner (\ /.monoid compose inner outer))
+        (_.cover [/.index]
+                 (and (|> (/.index inner (\ /.monoid compose inner outer))
                           (maybe.else fake_index)
                           (n.= 0))
-                      (|> (/.index_of outer (\ /.monoid compose inner outer))
+                      (|> (/.index outer (\ /.monoid compose inner outer))
                           (maybe.else fake_index)
                           (n.= 1))))
-        (_.cover [/.index_of']
+        (_.cover [/.index']
                  (let [full (\ /.monoid compose inner outer)]
-                   (and (|> (/.index_of' 0 inner full)
+                   (and (|> (/.index' 0 inner full)
                             (maybe.else fake_index)
                             (n.= 0))
-                        (|> (/.index_of' 1 inner full)
+                        (|> (/.index' 1 inner full)
                             (maybe.else fake_index)
                             (n.= fake_index))
                         
-                        (|> (/.index_of' 0 outer full)
+                        (|> (/.index' 0 outer full)
                             (maybe.else fake_index)
                             (n.= 1))
-                        (|> (/.index_of' 1 outer full)
+                        (|> (/.index' 1 outer full)
                             (maybe.else fake_index)
                             (n.= 1))
-                        (|> (/.index_of' 2 outer full)
+                        (|> (/.index' 2 outer full)
                             (maybe.else fake_index)
                             (n.= fake_index)))))
-        (_.cover [/.last_index_of]
+        (_.cover [/.last_index]
                  (let [full ($_ (\ /.monoid compose) outer inner outer)]
-                   (and (|> (/.last_index_of inner full)
+                   (and (|> (/.last_index inner full)
                             (maybe.else fake_index)
                             (n.= 1))
-                        (|> (/.last_index_of outer full)
+                        (|> (/.last_index outer full)
                             (maybe.else fake_index)
                             (n.= 2)))))
         )))
@@ -153,7 +153,7 @@
         (_.cover [/.char]
                  (case (/.char expected sample)
                    (#.Some char)
-                   (case (/.index_of (/.of_char char) sample)
+                   (case (/.index (/.of_char char) sample)
                      (#.Some actual)
                      (n.= expected actual)
 
-- 
cgit v1.2.3