hedgewars/uGearsHandlersMess.pas
changeset 15938 4c0f8dbf6c13
parent 15927 046182f1080b
parent 15937 1becf4a0e907
child 15986 7125918637e9
--- a/hedgewars/uGearsHandlersMess.pas	Tue Dec 13 21:21:55 2022 +0100
+++ b/hedgewars/uGearsHandlersMess.pas	Fri Jan 20 21:40:37 2023 -0500
@@ -264,6 +264,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