nichkara/lace
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Cosmetics.

Browse Source
This commit is contained in:
Rod Kay
2025-04-25 15:52:14 +10:00
parent 9693041373
commit cfc91c0576
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -587,7 +587,7 @@ is
-- added_Event : gel.remote.World.sprite_added_Event; -- added_Event : gel.remote.World.sprite_added_Event;
begin begin
log ("gel.world.client.add (sprite and children) " & the_Sprite.Name & the_Sprite.Id'Image); -- log ("gel.world.client.add (sprite and children) " & the_Sprite.Name & the_Sprite.Id'Image);
gel.World.item (Self.all).add (the_Sprite, and_Children); -- Do base class. gel.World.item (Self.all).add (the_Sprite, and_Children); -- Do base class.
-- Self.all_Sprites.Map.add (the_Sprite); -- Self.all_Sprites.Map.add (the_Sprite);
@@ -806,7 +806,7 @@ is
procedure add (the_Sprite : in Sprite.view) procedure add (the_Sprite : in Sprite.view)
is is
begin begin
log ("safe_id_Map_of_sprite" & the_Sprite.Id'Image); -- log ("safe_id_Map_of_sprite" & the_Sprite.Id'Image);
-- raise Program_Error; -- raise Program_Error;
Map.insert (the_Sprite.Id, Map.insert (the_Sprite.Id,
the_Sprite); the_Sprite);