--- deliantra/server/plugins/cfperl/typemap	2006/02/03 07:25:25	1.1
+++ deliantra/server/plugins/cfperl/typemap	2006/03/15 14:05:32	1.1.1.1
@@ -5,6 +5,9 @@
 region *	T_REGION
 player *	T_PLAYER
 
+object_ornull *		T_OBJECT_ORNULL
+mapstruct_ornull *	T_MAP_ORNULL
+
 INPUT
 
 T_OBJECT
@@ -20,6 +23,11 @@
 T_PLAYER
 	$var = (player *)SvPTR ($arg, \"cf::player\");
 
+T_OBJECT_ORNULL
+	$var = (object *)SvPTR_ornull ($arg, \"cf::object\");
+T_MAP_ORNULL
+	$var = (mapstruct *)SvPTR_ornull ($arg, \"cf::map\");
+
 OUTPUT
 
 T_OBJECT