From 24781de8bedb3bf4d12d7ec1d0307842e59a3f94 Mon Sep 17 00:00:00 2001
From: Jedidiah Barber <contact@jedbarber.id.au>
Date: Tue, 10 Dec 2024 20:47:53 +1300
Subject: Binding for filename.H added

---
 src/fltk-file_choosers.ads | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'src/fltk-file_choosers.ads')

diff --git a/src/fltk-file_choosers.ads b/src/fltk-file_choosers.ads
index b350ddc..cea7b36 100644
--- a/src/fltk-file_choosers.ads
+++ b/src/fltk-file_choosers.ads
@@ -6,6 +6,7 @@
 
 with
 
+    FLTK.Filenames,
     FLTK.Widgets.Buttons.Light.Check;
 
 private with
@@ -46,6 +47,12 @@ package FLTK.File_Choosers is
 
 
 
+    Sort_Method : not null FLTK.Filenames.Compare_Function :=
+        FLTK.Filenames.Numeric_Sort'Access;
+
+
+
+
     function New_Button
            (This : in out File_Chooser)
         return FLTK.Widgets.Buttons.Button_Reference;
-- 
cgit