hedgewars/uWorld.pas
changeset 2152 a2811690da1b
parent 2142 48ed98cfd119
child 2161 0c8634241fa4
--- a/hedgewars/uWorld.pas	Mon Jun 08 16:35:29 2009 +0000
+++ b/hedgewars/uWorld.pas	Thu Jun 11 15:22:02 2009 +0000
@@ -40,7 +40,7 @@
 
 implementation
 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound,
-{$IFDEF IPHONE}
+{$IFDEF GLES11}
 	gles11,
 {$ELSE}
 	GL,
@@ -417,7 +417,7 @@
       CountTicks:= 0;
       s:= inttostr(FPS) + ' fps';
       if fpsTexture <> nil then FreeTexture(fpsTexture);
-{$IFNDEF IPHONE}
+{$IFNDEF IPHONEOS}
       tmpSurface:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(s), $FFFFFF);
 {$ENDIF}
       fpsTexture:= Surface2Tex(tmpSurface);