hedgewars/uGears.pas
changeset 590 e816adf4a27f
parent 568 d0690b7aa808
child 593 1f5e66379a43
--- a/hedgewars/uGears.pas	Sun Sep 09 14:53:28 2007 +0000
+++ b/hedgewars/uGears.pas	Mon Sep 10 20:00:58 2007 +0000
@@ -130,7 +130,8 @@
                                                                @doStepGirder,
                                                                @doStepTeleport,
                                                                @doStepHealthTag,
-                                                               @doStepSwitcher
+                                                               @doStepSwitcher,
+                                                               @doStepCase
                                                                );
 
 procedure InsertGearToList(Gear: PGear);