From f2352c6df585d817b3613145ec81446f917dcc21 Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Sun, 2 Mar 2025 16:06:45 +1300
Subject: Filled holes in FLTK.Static API

---
 body/fltk-help_dialogs.adb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'body/fltk-help_dialogs.adb')

diff --git a/body/fltk-help_dialogs.adb b/body/fltk-help_dialogs.adb
index 48cdf18..6348527 100644
--- a/body/fltk-help_dialogs.adb
+++ b/body/fltk-help_dialogs.adb
@@ -6,7 +6,7 @@
 
 with
 
-    FLTK.Show_Argv,
+    FLTK.Args_Marshal,
     Interfaces.C.Strings;
 
 use type
@@ -227,7 +227,7 @@ package body FLTK.Help_Dialogs is
     procedure Show_With_Args
            (This : in out Help_Dialog) is
     begin
-        FLTK.Show_Argv.Dispatch (fl_help_dialog_show2'Access, This.Void_Ptr);
+        FLTK.Args_Marshal.Dispatch (fl_help_dialog_show2'Access, This.Void_Ptr);
     end Show_With_Args;
 
 
-- 
cgit