diff options
author | Jedidiah Barber <contact@jedbarber.id.au> | 2024-02-02 11:18:01 +1300 |
---|---|---|
committer | Jedidiah Barber <contact@jedbarber.id.au> | 2024-02-02 11:18:01 +1300 |
commit | 74336ca78b2b6bd42b50cce21bd1fe71f98cc56a (patch) | |
tree | 2c33e7db2411cd2f8c51625d306e64d78f1a5907 /src/fltk-widgets-charts.adb | |
parent | 6dc3561cd65db354727d6b38e556d1166165aed2 (diff) |
First pass at draw functions
Diffstat (limited to 'src/fltk-widgets-charts.adb')
-rw-r--r-- | src/fltk-widgets-charts.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/fltk-widgets-charts.adb b/src/fltk-widgets-charts.adb index 63bd604..573a011 100644 --- a/src/fltk-widgets-charts.adb +++ b/src/fltk-widgets-charts.adb @@ -231,7 +231,7 @@ package body FLTK.Widgets.Charts is (This : in out Chart; Data_Value : in Long_Float; Data_Label : in String := ""; - Data_Color : in Color := No_Color) is + Data_Color : in Color := Foreground_Color) is begin fl_chart_add (This.Void_Ptr, @@ -246,7 +246,7 @@ package body FLTK.Widgets.Charts is Position : in Natural; Data_Value : in Long_Float; Data_Label : in String := ""; - Data_Color : in Color := No_Color) is + Data_Color : in Color := Foreground_Color) is begin fl_chart_insert (This.Void_Ptr, @@ -262,7 +262,7 @@ package body FLTK.Widgets.Charts is Position : in Natural; Data_Value : in Long_Float; Data_Label : in String := ""; - Data_Color : in Color := No_Color) is + Data_Color : in Color := Foreground_Color) is begin fl_chart_replace (This.Void_Ptr, |