diff --git a/4-high/gel/source/world/gel-world-server.adb b/4-high/gel/source/world/gel-world-server.adb
index cb579fd..27f51b1 100644
--- a/4-high/gel/source/world/gel-world-server.adb
+++ b/4-high/gel/source/world/gel-world-server.adb
@@ -128,7 +128,7 @@ is
       return the_Sprite;
    end to_Sprite;
 
-   pragma Unreferenced (to_Sprite);
+   --  pragma Unreferenced (to_Sprite);
 
 
    ----------