--- deliantra/server/socket/item.C	2007/07/01 05:00:20	1.50
+++ deliantra/server/socket/item.C	2007/09/30 20:22:25	1.53
@@ -265,7 +265,7 @@
   if (QUERY_FLAG (head, FLAG_NO_PICK))
     flags |= F_NOPICK;
 
-  ns.send_face (head->face);
+  ns.send_face (head->face, -50);
   ns.flush_fx ();
 
   if (QUERY_FLAG (head, FLAG_ANIMATE) && !ns.anims_sent[head->animation_id])
@@ -359,7 +359,7 @@
 
   sl << uint32 (0);
 
-  pl->ns->send_face (empty_face);
+  pl->ns->send_face (empty_face, -50);
   pl->ns->flush_fx ();
 
   if (pl->ns->look_position)
@@ -427,7 +427,7 @@
           add_object_to_socklist (*pl->ns, sl, head);
           got_one++;
 
-          if (sl.length () >= (MAXSOCKBUF - MAXITEMLEN))
+          if (sl.length () > MAXSOCKBUF - MAXITEMLEN)
             {
               pl->ns->send_packet (sl);
 
@@ -481,7 +481,7 @@
            * items (especially with some of the bags out there) to
            * overflow the buffer.  IF so, send multiple item commands.
            */
-          if (sl.length () >= (MAXSOCKBUF - MAXITEMLEN))
+          if (sl.length () > MAXSOCKBUF - MAXITEMLEN)
             {
               pl->contr->ns->send_packet (sl);
 
@@ -558,7 +558,7 @@
 
   if (flags & UPD_FACE)
     {
-      ns->send_face (op->face);
+      ns->send_face (op->face, -50);
       ns->flush_fx ();
       sl << uint32 (op->face);
     }
@@ -840,58 +840,38 @@
 static void
 look_at (player *pl, int dx, int dy)
 {
+  dynbuf_text buf;
   object *ob = pl->ob;
 
-  maptile *m = pl->observe->map;
-  sint16 x = pl->observe->x + dx;
-  sint16 y = pl->observe->y + dy;
+  mapxy pos (pl->observe);
+  pos.move (dx, dy);
 
-  if (!m)
-    return;
-
-  if (!xy_normalise (m, x, y))
-    {
-      new_draw_info (NDI_UNIQUE, 0, ob, "You see nothing there.");
-      return;
-    }
-
-  int flag = 0;
+  if (pos.normalise ())
+    for (object *tmp = pos->top; tmp; tmp = tmp->below)
+      {
+        if (tmp->invisible && !QUERY_FLAG (ob, FLAG_WIZ))
+          continue;
+
+        if (QUERY_FLAG (ob, FLAG_WIZ))
+          buf.printf ("- %s (%d).\n", query_name (tmp), tmp->count);
+        else
+          buf.printf ("- %s.\n", query_name (tmp));
+
+        object *head = tmp->head_ ();
+
+        if (head->inv)
+          if ((head->type != CONTAINER && head->type != FLESH)
+              || QUERY_FLAG (ob, FLAG_WIZ))
+            buf << head->query_inventory (ob, "  ");
+
+        if (QUERY_FLAG (tmp, FLAG_IS_FLOOR) && !QUERY_FLAG (ob, FLAG_WIZ))        /* don't continue under the floor */
+          break;
+      }
 
-  for (object *tmp = m->at (x, y).top; tmp; tmp = tmp->below)
-    {
-      if (tmp->invisible && !QUERY_FLAG (ob, FLAG_WIZ))
-        continue;
-
-      if (!flag)
-        {
-          if (dx || dy)
-            new_draw_info (NDI_UNIQUE, 0, ob, "There you see:");
-          else
-            new_draw_info (NDI_UNIQUE, 0, ob, "You see:");
-
-          flag = 1;
-        }
-
-      if (QUERY_FLAG (ob, FLAG_WIZ))
-        new_draw_info_format (NDI_UNIQUE, 0, ob, "- %s (%d).", query_name (tmp), tmp->count);
-      else
-        new_draw_info_format (NDI_UNIQUE, 0, ob, "- %s.", query_name (tmp));
-
-      if (((tmp->inv != NULL || (tmp->head && tmp->head->inv)) &&
-           (tmp->type != CONTAINER && tmp->type != FLESH)) || QUERY_FLAG (ob, FLAG_WIZ))
-        inventory (ob, tmp->head == NULL ? tmp : tmp->head);
-
-      if (QUERY_FLAG (tmp, FLAG_IS_FLOOR) && !QUERY_FLAG (ob, FLAG_WIZ))        /* don't continue under the floor */
-        break;
-    }
-
-  if (!flag)
-    {
-      if (dx || dy)
-        new_draw_info (NDI_UNIQUE, 0, ob, "You see nothing there.");
-      else
-        new_draw_info (NDI_UNIQUE, 0, ob, "You see nothing.");
-    }
+  if (buf.empty ())
+    pl->failmsg ("You see nothing there.");
+  else
+    pl->infobox (MSG_CHANNEL ("lookat"), buf);
 }
 
 /** Client wants to look at some object.  Lets do so. */