--- a/hedgewars/GSHandlers.inc	Sun Dec 19 21:16:14 2010 -0500
+++ b/hedgewars/GSHandlers.inc	Sun Dec 19 22:06:38 2010 -0500
@@ -553,7 +553,7 @@
         end;
     if ((GameTicks and $1F) = 0) and (Random(3) = 0) then
         begin
-        AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtDust);
+        particle:= AddVisualGear(hwRound(Gear^.X), hwRound(Gear^.Y), vgtDust);
         if particle <> nil then particle^.dX := particle^.dX + (Gear^.dX.QWordValue / 21474836480)
         end
 end;