--- deliantra/server/common/object.C	2006/09/12 18:15:34	1.35
+++ deliantra/server/common/object.C	2006/09/12 19:20:06	1.36
@@ -2859,3 +2859,32 @@
     item = item->env;
 }
 
+// return a suitable string describing an objetc in enough detail to find it
+const char *
+object::debug_desc (char *info) const
+{
+  char info2[256 * 3];
+  char *p = info;
+
+  p += snprintf (p, 256, "%d=\"%s%s%s\"",
+                 count,
+                 &name,
+                 title ? " " : "",
+                 title ? (const char *)title : "");
+
+  if (env)
+    p += snprintf (p, 256, "(in %s)", env->debug_desc (info2));
+
+  if (map)
+    p += snprintf (p, 256, "(on %s@%d+%d)", map->path, x, y);
+
+  return info;
+}
+
+const char *
+object::debug_desc () const
+{
+  static char info[256 * 3];
+  return debug_desc (info);
+}
+