# HG changeset patch
# User alfadur
# Date 1592698677 -10800
# Node ID adbd2bcf7159ba22b052c9f9ca7a0c3f310e980e
# Parent  6c689729b7458263532c370591511e06964f2025
fix crosshairs spinning around

diff -r 6c689729b745 -r adbd2bcf7159 hedgewars/uGearsRender.pas
--- a/hedgewars/uGearsRender.pas	Sun Jun 21 03:08:21 2020 +0300
+++ b/hedgewars/uGearsRender.pas	Sun Jun 21 03:17:57 2020 +0300
@@ -315,9 +315,14 @@
     // render crosshair
     if (CrosshairGear <> nil) and (Gear = CrosshairGear) then
         begin
-        hogLR:= 1;
-        if IsHogFacingLeft(Gear) then
-            hogLR:= -1;
+        if (CurAmmoGear <> nil) and (CurAmmoGear^.Kind = gtBlowTorch) then
+            hogLR:= CurAmmoGear^.Tag
+        else
+            begin
+            hogLR:= 1;
+            if IsHogFacingLeft(Gear) then
+                hogLR:= -1
+            end;
         setTintAdd(true);
         Tint(HH^.Team^.Clan^.Color shl 8 or $FF);
         DrawTextureRotated(CrosshairTexture,