From f9e453e3d456514066e8ecbed9fbac93a588a0d0 Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Tue, 21 Jan 2025 00:53:56 +1300 Subject: Using the type method is now more consistent --- src/fltk-file_choosers.ads | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/fltk-file_choosers.ads') diff --git a/src/fltk-file_choosers.ads b/src/fltk-file_choosers.ads index cea7b36..927ae04 100644 --- a/src/fltk-file_choosers.ads +++ b/src/fltk-file_choosers.ads @@ -238,11 +238,11 @@ package FLTK.File_Choosers is (This : in out File_Chooser; Size : in Font_Size); - function Get_Chooser_Kind + function Get_Kind (This : in File_Chooser) return Chooser_Kind; - procedure Set_Chooser_Kind + procedure Set_Kind (This : in out File_Chooser; Kind : in Chooser_Kind); @@ -379,7 +379,7 @@ private pragma Inline (Set_Text_Font); pragma Inline (Get_Text_Size); pragma Inline (Set_Text_Size); - pragma Inline (Set_Chooser_Kind); + pragma Inline (Set_Kind); pragma Inline (Number_Selected); pragma Inline (Get_Filter_Index); -- cgit