hedgewars/uLocale.pas
changeset 1140 a32f1eed51a6
parent 1089 24e9e1ca0394
child 1221 51e3f3cfdca5
--- a/hedgewars/uLocale.pas	Tue Jul 29 20:03:25 2008 +0000
+++ b/hedgewars/uLocale.pas	Tue Jul 29 22:59:19 2008 +0000
@@ -53,10 +53,10 @@
       if s[1] = ';' then continue;
       TryDo(Length(s) > 6, 'Load locale: empty string', true);
       val(s[1]+s[2], a, c);
-      TryDo(c = 0, 'Load locale: numbers should be two-digit', true);
+      TryDo(c = 0, 'Load locale: numbers should be two-digit: ' + s, true);
       TryDo(s[3] = ':', 'Load locale: ":" expected', true);
       val(s[4]+s[5], b, c);
-      TryDo(c = 0, 'Load locale: numbers should be two-digit', true);
+      TryDo(c = 0, 'Load locale: numbers should be two-digit' + s, true);
       TryDo(s[6] = '=', 'Load locale: "=" expected', true);
       Delete(s, 1, 6);
       case a of