diff options
| author | Jedidiah Barber <contact@jedbarber.id.au> | 2024-12-09 02:22:17 +1300 |
|---|---|---|
| committer | Jedidiah Barber <contact@jedbarber.id.au> | 2024-12-09 02:22:17 +1300 |
| commit | 98abc141c9cb76bc12f8ba10f18fd87e32aae251 (patch) | |
| tree | 853bd986842a3d9b2c1d84f7f60c13216fd90f41 /src/fltk-widgets.ads | |
| parent | df63542510b6912405f3709b204ad3a59548c917 (diff) | |
Fl_File_Chooser bound
Diffstat (limited to 'src/fltk-widgets.ads')
| -rw-r--r-- | src/fltk-widgets.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/fltk-widgets.ads b/src/fltk-widgets.ads index f37870d..d7cbca8 100644 --- a/src/fltk-widgets.ads +++ b/src/fltk-widgets.ads @@ -370,6 +370,10 @@ private -- Groups.Browsers (has two internal Scrollbars) -- If weird Init/Final errors start mysteriously occuring then check there first. + -- Extra_Init functionality is also duplicated in FLTK.File_Choosers + -- for reasons of hierarchy visibility. Really, the File_Chooser should be in + -- the Widget hierarchy like Color_Chooser but for some reason it isn't. + procedure Extra_Init (This : in out Widget; X, Y, W, H : in Integer; |