Clean up capitalize function

This commit is contained in:
Jayvant Javier Pujara 2012-11-16 23:22:21 -05:00
parent ac4cf4849a
commit be8d070f6d

View File

@ -111,14 +111,12 @@ Uppercase(String)
return String return String
} }
Capitalize(W) Capitalize(String)
{ {
;StringUpper, String, String, T Initial := SubStr(String, 1, 1)
;return String
Initial := SubStr(W, 1, 1)
StringUpper, Initial, Initial StringUpper, Initial, Initial
StringTrimLeft, W, W, 1 StringTrimLeft, String, String, 1
return Initial . W return Initial . String
} }
SafeQuote(string) ; Escape single quotes for sql update. Insert doesn't seem to need it because the DB library handles it. SafeQuote(string) ; Escape single quotes for sql update. Insert doesn't seem to need it because the DB library handles it.