hedgewars/uGears.pas
changeset 14759 c6b7f4a4122c
parent 14757 16168aff08c7
child 14765 ba8dd081359d
--- a/hedgewars/uGears.pas	Sun Apr 07 23:08:33 2019 +0200
+++ b/hedgewars/uGears.pas	Sun Apr 07 23:21:07 2019 +0200
@@ -1151,6 +1151,7 @@
             begin
             gear^.Pos := gear^.Pos + posCaseHealth;
             gear^.RenderHealth:= true;
+            gear^.Karma:= 2;
             // health crate is smaller than the other crates
             gear^.Radius := cCaseHealthRadius;
             if(FinishedTurnsTotal > -1) then