--- deliantra/server/server/cfperl.xs	2006/08/29 05:29:48	1.24
+++ deliantra/server/server/cfperl.xs	2006/08/29 07:56:56	1.25
@@ -2101,8 +2101,7 @@
 	AV *av = (AV *)sv_2mortal ((SV *)newAV ());
         for (int i = 2; i < items; i++) av_push (av, SvREFCNT_inc (ST (i)));
         RETVAL = INVOKE_((event_type)event, ARG_MAP (map), ARG_AV (av));
-	OUTPUT:
-        RETVAL
+	OUTPUT: RETVAL
 
 SV *registry (mapstruct *map)
 	CODE: