diff options
| author | Jedidiah Barber <contact@jedbarber.id.au> | 2025-01-21 00:53:56 +1300 |
|---|---|---|
| committer | Jedidiah Barber <contact@jedbarber.id.au> | 2025-01-21 00:53:56 +1300 |
| commit | f9e453e3d456514066e8ecbed9fbac93a588a0d0 (patch) | |
| tree | 06587afde830fb324d5ab7372f0f1686c4fd993a /src/fltk-widgets.ads | |
| parent | 67a43ef89ba41ac32b86cda7396c16fffaf691b3 (diff) | |
Using the type method is now more consistent
Diffstat (limited to 'src/fltk-widgets.ads')
| -rw-r--r-- | src/fltk-widgets.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/fltk-widgets.ads b/src/fltk-widgets.ads index 64f9166..07f9b2e 100644 --- a/src/fltk-widgets.ads +++ b/src/fltk-widgets.ads @@ -238,11 +238,11 @@ package FLTK.Widgets is (This : in out Widget; Size : in Font_Size); - function Get_Label_Type + function Get_Label_Kind (This : in Widget) return Label_Kind; - procedure Set_Label_Type + procedure Set_Label_Kind (This : in out Widget; Label : in Label_Kind); @@ -497,8 +497,8 @@ private pragma Inline (Set_Label_Font); pragma Inline (Get_Label_Size); pragma Inline (Set_Label_Size); - pragma Inline (Get_Label_Type); - pragma Inline (Set_Label_Type); + pragma Inline (Get_Label_Kind); + pragma Inline (Set_Label_Kind); pragma Inline (Measure_Label); pragma Inline (Get_Callback); |