Index: vhUnitTest/TECH/StringUtils/ToFirstCase/Test.cls.xml
===================================================================
diff -u -r3447 -r3448
--- vhUnitTest/TECH/StringUtils/ToFirstCase/Test.cls.xml	(.../Test.cls.xml)	(revision 3447)
+++ vhUnitTest/TECH/StringUtils/ToFirstCase/Test.cls.xml	(.../Test.cls.xml)	(revision 3448)
@@ -11,6 +11,9 @@
 	Do $$$AssertEquals(##class(TECH.StringUtils).ToFirstCase("1234NuMmErS"),"1234nummers")
 	Do $$$AssertEquals(##class(TECH.StringUtils).ToFirstCase(" EerstEenSpatie")," eersteenspatie")
 	Do $$$AssertEquals(##class(TECH.StringUtils).ToFirstCase("#%!SpecialeTekens"),"#%!specialetekens")
+	Do $$$AssertEquals(##class(TECH.StringUtils).ToFirstCase("l"),"L")
+	Do $$$AssertEquals(##class(TECH.StringUtils).ToFirstCase("U"),"U")
+	Do $$$AssertEquals(##class(TECH.StringUtils).ToFirstCase(""),"")
 ]]></Implementation>
 </Method>
 </Class>