changeset 6963 | 0c181b88daff |
parent 6962 | ec308eabe09b |
child 6982 | 8d41d22a291d |
--- a/hedgewars/uWorld.pas Sun Apr 29 21:05:09 2012 +0200 +++ b/hedgewars/uWorld.pas Sun Apr 29 21:17:27 2012 +0200 @@ -1751,6 +1751,7 @@ procedure SetUtilityWidgetState(ammoType: TAmmoType); begin +{$IFDEF TOUCH_INTERFACE} if(ammoType = amNothing)then ammoType:= CurrentHedgehog^.CurAmmoType; @@ -1772,6 +1773,7 @@ end else if utilityWidget.show then animateWidget(@utilityWidget, true, false); +{$ENDIF} end; procedure animateWidget(widget: POnScreenWidget; fade, showWidget: boolean);