--- deliantra/server/server/cfperl.xs	2008/04/20 06:20:38	1.279
+++ deliantra/server/server/cfperl.xs	2008/04/21 06:35:26	1.280
@@ -2081,8 +2081,6 @@
         RETVAL = query_base_name (op, plural);
         OUTPUT: RETVAL
 
-object *decrease_ob_nr (object *op, unsigned long i)
-
 # return the tail of an object, excluding itself
 void
 tail (object *op)