diff options
| author | Jedidiah Barber <contact@jedbarber.id.au> | 2024-02-20 19:42:18 +1300 |
|---|---|---|
| committer | Jedidiah Barber <contact@jedbarber.id.au> | 2024-02-20 19:42:18 +1300 |
| commit | c5b296567825c48d3658d62f01ec770449379e85 (patch) | |
| tree | be08ece88dc76bcaff14e6c1e6910b873b6a0e00 /src/fltk-widgets-groups-windows.adb | |
| parent | f18ea4474bb4905a00e0b39e7205c177ee994196 (diff) | |
Changed Mouse_Cursor to Mouse_Cursor_Kind for naming consistency
Diffstat (limited to 'src/fltk-widgets-groups-windows.adb')
| -rw-r--r-- | src/fltk-widgets-groups-windows.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fltk-widgets-groups-windows.adb b/src/fltk-widgets-groups-windows.adb index c1ffb31..68b2301 100644 --- a/src/fltk-widgets-groups-windows.adb +++ b/src/fltk-widgets-groups-windows.adb @@ -516,7 +516,7 @@ package body FLTK.Widgets.Groups.Windows is procedure Set_Cursor (This : in out Window; - To : in Mouse_Cursor) is + To : in Mouse_Cursor_Kind) is begin fl_window_set_cursor (This.Void_Ptr, Cursor_Values (To)); end Set_Cursor; @@ -537,7 +537,7 @@ package body FLTK.Widgets.Groups.Windows is procedure Set_Default_Cursor (This : in out Window; - To : in Mouse_Cursor) is + To : in Mouse_Cursor_Kind) is begin fl_window_set_default_cursor (This.Void_Ptr, Cursor_Values (To)); end Set_Default_Cursor; |