--- deliantra/server/plugins/cfperl/cfperl.xs	2006/02/08 06:15:13	1.18
+++ deliantra/server/plugins/cfperl/cfperl.xs	2006/02/08 07:14:56	1.19
@@ -1178,7 +1178,7 @@
 
 void cf_object_set_flag (object *op, int flag, int value)
 
-void cf_object_move (object *op, int dir, object *originator)
+void cf_object_move (object *op, int dir, object *originator = op)
 
 void cf_object_apply (object *op, object *author, int flags = 0)