1 files changed, 1 insertions, 1 deletions
diff --git a/src/grids.adb b/src/grids.adb
index 3da212b..12f1ae4 100644
--- a/src/grids.adb
+++ b/src/grids.adb
@@ -9,7 +9,7 @@ package body Grids is
         return Grid is
     begin
         return This : Grid :=
-            (FLTK.Widgets.Widget'(FLTK.Widgets.Create (X, Y, W, H, Text)) with
+            (FLTK.Widgets.Widget'(FLTK.Widgets.Forge.Create (X, Y, W, H, Text)) with
                 Cells => Square_Vector_Vectors.Empty_Vector,
                 Rows => 0, Cols => 0);
     end Create;