diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2018-03-20 01:41:49 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2018-03-20 01:41:49 +1100 |
| commit | 09d9f2f6fc83af3bdc76717941eb13b77b2b1613 (patch) | |
| tree | 82b57130cd381b9a0b261eabdc4239c09dcc17f2 /src/fltk-widgets-groups-color_choosers.adb | |
| parent | c1dcb4c61e79b1ddd98c0ef84f2d36be7f7fd736 (diff) | |
Moved several Widgets from the Partially list to the Done list
Diffstat (limited to 'src/fltk-widgets-groups-color_choosers.adb')
| -rw-r--r-- | src/fltk-widgets-groups-color_choosers.adb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/fltk-widgets-groups-color_choosers.adb b/src/fltk-widgets-groups-color_choosers.adb index c47533a..dabcf00 100644 --- a/src/fltk-widgets-groups-color_choosers.adb +++ b/src/fltk-widgets-groups-color_choosers.adb @@ -240,6 +240,13 @@ package body FLTK.Widgets.Groups.Color_Choosers is end Color_Was_Changed; + procedure Clear_Changed + (This : in out Color_Chooser) is + begin + This.Was_Changed := False; + end Clear_Changed; + + function Get_Mode |