lace.text.utility: Cosmetics.

1-base/lace/source/text/lace-text-utility.adb

@@ -6,12 +6,12 @@ with
 package body lace.Text.utility
 is
 
-   function Contains (Self : in Text.item;   Pattern : in String) return Boolean
+   function contains (Self : in Text.item;   Pattern : in String) return Boolean
    is
       use ada.Strings.fixed;
    begin
       return Index (+Self, Pattern) /= 0;
-   end Contains;
+   end contains;
 
 
 

1-base/lace/source/text/lace-text-utility.ads

@@ -3,7 +3,7 @@ package lace.Text.utility
 -- Provides utility subprograms.
 --
 is
-   function  Contains (Self : in     Text.item;   Pattern : in String) return Boolean;
+   function  contains (Self : in     Text.item;   Pattern : in String) return Boolean;
 
 
    function  replace  (Self : in     Text.item;   Pattern : in String;