# HG changeset patch
# User nemo
# Date 1242485464 0
# Node ID 0f99aa28b9f4ae1f44dfd1cc3f03da4eeb7e892c
# Parent  3e9e5e1be6f5a6ca78594bffb8d77f244c4c3b43
Should disable construction in the shoppa hack, I think.  Construction is annoying

diff -r 3e9e5e1be6f5 -r 0f99aa28b9f4 hedgewars/uAmmos.pas
--- a/hedgewars/uAmmos.pas	Fri May 15 17:15:37 2009 +0000
+++ b/hedgewars/uAmmos.pas	Sat May 16 14:51:04 2009 +0000
@@ -95,7 +95,12 @@
         end
     else if shoppa then      // TEMPORARY REMOVE WHEN CRATE PROBABILITY IS ADDED
         if not cnt = AMMO_INFINITE then
-            Ammoz[a].Probability:= 100;
+            begin
+            if a = amGirder then
+                Ammoz[a].Probability:= 0
+            else
+                Ammoz[a].Probability:= 100
+            end;
     ammos[a]:= cnt
     end;