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-04 19:12:54 +11:00
parent e36c665501
commit 8322451898
3 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
4-high/gel/source/forge/gel-forge.adb
View File

@@ -164,7 +164,7 @@ is
else else
the_graphics_Model := openGL.Model.circle.lit_textured.new_Circle (Radius, the_graphics_Model := openGL.Model.circle.lit_textured.new_Circle (Radius,
Face => (Fades => [1 => 0.0, others => <>], Face => (Fades => [1 => 0.0, others => <>],
texture_Applies => [1 => True, others => <>], texture_Applies => [1 => True, others => <>],
Textures => [1 => Texture, others => <>], Textures => [1 => Texture, others => <>],
texture_Count => 1, texture_Count => 1,
Animation => null)).all'Access; Animation => null)).all'Access;

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

@@ -564,7 +564,7 @@ is
Self.graphics_Models, Self.graphics_Models,
Self. physics_Models, Self. physics_Models,
gel.World.view (Self)); gel.World.view (Self));
log ("*** gel.world.client.is_a_Mirror.add sprite ~ " & the_Sprite.Name'Image); -- log ("*** gel.world.client.is_a_Mirror.add sprite ~ " & the_Sprite.Name'Image);
Self.add (the_Sprite); Self.add (the_Sprite);
end loop; end loop;
end; end;

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

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