hedgewars/uGearsHandlersMess.pas
branch1.0.0
changeset 15907 1becf4a0e907
parent 15359 c117e17b90bc
child 15908 4c0f8dbf6c13
--- a/hedgewars/uGearsHandlersMess.pas	Mon Oct 24 10:06:52 2022 -0400
+++ b/hedgewars/uGearsHandlersMess.pas	Fri Jan 20 21:39:53 2023 -0500
@@ -262,6 +262,7 @@
 
 procedure HideHog(HH: PHedgehog);
 begin
+    if HH^.Gear = nil then exit;
     ScriptCall('onHogHide', HH^.Gear^.Uid);
     DeleteCI(HH^.Gear);
     if FollowGear = HH^.Gear then