diff -r 2a989e5abda6 -r a0332e79fdc9 hedgewars/uConsole.pas --- a/hedgewars/uConsole.pas Sun Mar 01 17:24:25 2009 +0000 +++ b/hedgewars/uConsole.pas Sun Mar 01 17:30:10 2009 +0000 @@ -100,14 +100,16 @@ var i, t: LongInt; begin i:= Pos(' ', a); -if i>0 then - begin - for t:= 1 to Pred(i) do - if (a[t] >= 'A')and(a[t] <= 'Z') then Inc(a[t], 32); - b:= copy(a, i + 1, Length(a) - i); - while (b[0]<>#0) and (b[1]=#32) do Delete(b, 1, 1); - byte(a[0]):= Pred(i) - end else b:= ''; +if i > 0 then + begin + for t:= 1 to Pred(i) do + if (a[t] >= 'A')and(a[t] <= 'Z') then Inc(a[t], 32); + b:= copy(a, i + 1, Length(a) - i); + while (b[0] <> #0) do + Delete(b, 1, 1); + + byte(a[0]):= Pred(i) + end else b:= ''; end; procedure WriteToConsole(s: shortstring);