From a6900505684ddd3a68188534ad48beba036e279a Mon Sep 17 00:00:00 2001 From: Rod Kay Date: Tue, 24 Sep 2024 14:35:16 +1000 Subject: [PATCH] gel.forge.new_polygon_Sprite: Set 'texture_Applies' to 'True'. --- 4-high/gel/source/forge/gel-forge.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/4-high/gel/source/forge/gel-forge.adb b/4-high/gel/source/forge/gel-forge.adb index 4dc481a..fdf88d5 100644 --- a/4-high/gel/source/forge/gel-forge.adb +++ b/4-high/gel/source/forge/gel-forge.adb @@ -226,7 +226,7 @@ is Textures => [1 => Texture, others => <>], texture_Count => 1, texture_Tiling => texture_Tiling, - texture_Applies => [others => <>], + texture_Applies => [others => True], Animation => null)).all'Access; end if;