equal
deleted
inserted
replaced
59 loaded:= true; |
59 loaded:= true; |
60 TryDo(loaded, 'Cannot load locale "' + FileName + '"', false); |
60 TryDo(loaded, 'Cannot load locale "' + FileName + '"', false); |
61 if loaded then |
61 if loaded then |
62 begin |
62 begin |
63 while not eof(f) do |
63 while not eof(f) do |
64 begin |
64 begin |
65 readln(f, s); |
65 readln(f, s); |
66 if Length(s) = 0 then |
66 if Length(s) = 0 then |
67 continue; |
67 continue; |
68 if (s[1] < '0') or (s[1] > '9') then |
68 if (s[1] < '0') or (s[1] > '9') then |
69 continue; |
69 continue; |
70 TryDo(Length(s) > 6, 'Load locale: empty string', true); |
70 TryDo(Length(s) > 6, 'Load locale: empty string', true); |