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

gel.forge.new_circle_sprite: Add color.

Browse Source
This commit is contained in:
Rod Kay
2023-10-21 14:27:30 +11:00
parent 8ea8928fd0
commit 77512c2247
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -140,9 +140,10 @@ is
if Texture = openGL.null_Asset if Texture = openGL.null_Asset
then then
the_graphics_Model := openGL.Model.sphere.lit_colored.new_Sphere (Radius, the_graphics_Model := openGL.Model.sphere.lit_colored.new_Sphere (Radius,
Color => (Color, openGL.Opaque)).all'Access; Color => (Color, Opaque)).all'Access;
else else
the_graphics_Model := openGL.Model.sphere.lit_colored_textured.new_Sphere (Radius, the_graphics_Model := openGL.Model.sphere.lit_colored_textured.new_Sphere (Radius,
Color => (Color, Opaque),
Image => Texture).all'Access; Image => Texture).all'Access;
end if; end if;