gel.world: Add debug info.

4-high/gel/source/world/gel-world-client.adb

@@ -557,7 +557,7 @@ is
             end loop;
          end;
 
-         --  Fetch sprites from the server.
+         --  Create our local sprites.
          --
          declare
             the_Sprite         :          gel.Sprite.view;
@@ -591,13 +591,12 @@ is
       added_Event : gel.remote.World.sprite_added_Event;
 
    begin
+      log ("gel.world.client.add (sprite and children)" & the_Sprite.Name & the_Sprite.Id'Image);
       gel.World.item (Self.all).add (the_Sprite);     -- Do base class.
       Self.all_Sprites.Map.add (the_Sprite);
 
       added_Event.Sprite := the_Sprite.Id;
       Self.emit (added_Event);
-
-
    end add;
 
 

4-high/gel/source/world/gel-world.adb

@@ -802,7 +802,7 @@ is
          --  Emit a new model event.
          --
 
-         --  log ("gel.World.add ~ emit new graphics model event");
+         log ("gel.World.add ~ emit new graphics model event");
 
          declare
             the_Event : remote.World.new_graphics_model_Event;