# HG changeset patch
# User sheepluva
# Date 1403012369 -7200
# Node ID 240775460dc5bc8374ca1e13377e0c459f93645e
# Parent  c2e81eea375fd8b512953eab3175d9070aeed15b
fix pas2c build

diff -r c2e81eea375f -r 240775460dc5 hedgewars/pas2cSystem.pas
--- a/hedgewars/pas2cSystem.pas	Tue Jun 17 15:18:07 2014 +0200
+++ b/hedgewars/pas2cSystem.pas	Tue Jun 17 15:39:29 2014 +0200
@@ -106,7 +106,7 @@
     GL_RENDERER, GL_RGBA, GL_RGBA8, GL_SRC_ALPHA, GL_TEXTURE_2D,
     GL_TEXTURE_COORD_ARRAY, GL_TEXTURE_MAG_FILTER,
     GL_TEXTURE_MIN_FILTER, GL_TEXTURE_PRIORITY, GL_TEXTURE_WRAP_S,
-    GL_TEXTURE_WRAP_T, GL_TRIANGLE_FAN, GL_TRUE, GL_VENDOR,
+    GL_TEXTURE_WRAP_T, GL_TRIANGLE_STRIP, GL_TRIANGLE_FAN, GL_TRUE, GL_VENDOR,
     GL_VERSION, GL_VERTEX_ARRAY, GLenum,  GL_FRAMEBUFFER_EXT,
     GL_RENDERBUFFER_EXT, GL_DEPTH_ATTACHMENT_EXT,
     GL_COLOR_ATTACHMENT0_EXT, GL_FLOAT, GL_UNSIGNED_BYTE, GL_COMPILE_STATUS,
diff -r c2e81eea375f -r 240775460dc5 hedgewars/uWorld.pas
--- a/hedgewars/uWorld.pas	Tue Jun 17 15:18:07 2014 +0200
+++ b/hedgewars/uWorld.pas	Tue Jun 17 15:39:29 2014 +0200
@@ -1485,7 +1485,7 @@
 ScreenBottom:= (WorldDy - trunc(cScreenHeight/cScaleFactor) - (cScreenHeight div 2) + cWaterLine);
 
 // note: offsetY is negative!
-offsetY:= 5 * max(-145,min(0, CWaterLine + WorldDy - ViewBottomY)); //10 * Min(0, -145 - ScreenBottom);
+offsetY:= 10 *  Min(0, -145 - ScreenBottom); // TODO limit this in the other direction too
 
 if (cReducedQuality and rqNoBackground) = 0 then
     begin