hedgewars/uMisc.pas
changeset 869 daddcd31ef34
parent 865 a4a5ec6c61d4
child 883 07a568ba44e0
--- a/hedgewars/uMisc.pas	Thu Apr 24 19:55:10 2008 +0000
+++ b/hedgewars/uMisc.pas	Thu Apr 24 20:53:35 2008 +0000
@@ -234,7 +234,7 @@
 end;
 
 procedure SendStat(sit: TStatInfoType; s: shortstring);
-const stc: array [TStatInfoType] of char = 'rDK';
+const stc: array [TStatInfoType] of char = 'rDkK';
 begin
 SendIPC('i' + stc[sit] + s)
 end;
@@ -290,7 +290,7 @@
 if (surf^.format^.BytesPerPixel = 3) then mode:= GL_RGB else
 if (surf^.format^.BytesPerPixel = 4) then mode:= GL_RGBA else
    begin
-   TryDo(false, 'Surface2Tex: BytePerPixel not in [3, 4]', true);
+   TryDo(false, 'Surface2Tex: BytesPerPixel not in [3, 4]', true);
    Surface2Tex^.id:= 0;
    exit
    end;