diff options
| author | Jedidiah Barber <contact@jedbarber.id.au> | 2025-01-12 18:49:32 +1300 |
|---|---|---|
| committer | Jedidiah Barber <contact@jedbarber.id.au> | 2025-01-12 18:49:32 +1300 |
| commit | 75a8e0e68e4980647a6d588a15bb300d132b6650 (patch) | |
| tree | a728a05b9a4db547ad0886bb6975f8e0729c919c /src/fltk-widgets-groups-text_displays-text_editors.ads | |
| parent | 8b01c23e0ba1fd22e0bfc797d6ca540c79079674 (diff) | |
Fixed several preprocessor ABI version issues
Diffstat (limited to 'src/fltk-widgets-groups-text_displays-text_editors.ads')
| -rw-r--r-- | src/fltk-widgets-groups-text_displays-text_editors.ads | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/fltk-widgets-groups-text_displays-text_editors.ads b/src/fltk-widgets-groups-text_displays-text_editors.ads index 6520d69..36c945d 100644 --- a/src/fltk-widgets-groups-text_displays-text_editors.ads +++ b/src/fltk-widgets-groups-text_displays-text_editors.ads @@ -20,7 +20,7 @@ package FLTK.Widgets.Groups.Text_Displays.Text_Editors is type Insert_Mode is (Before, After); - -- type Tab_Navigation is (Insert_Char, Widget_Focus); + type Tab_Navigation is (Insert_Char, Widget_Focus); type Key_Func is access procedure (This : in out Text_Editor'Class); @@ -309,13 +309,13 @@ package FLTK.Widgets.Groups.Text_Displays.Text_Editors is - -- function Get_Tab_Nav_Mode - -- (This : in Text_Editor) - -- return Tab_Navigation; + function Get_Tab_Mode + (This : in Text_Editor) + return Tab_Navigation; - -- procedure Set_Tab_Nav_Mode - -- (This : in out Text_Editor; - -- To : in Tab_Navigation); + procedure Set_Tab_Mode + (This : in out Text_Editor; + To : in Tab_Navigation); |