diff options
Diffstat (limited to 'src/fltk-widgets-valuators-sliders-hor_fill.adb')
| -rw-r--r-- | src/fltk-widgets-valuators-sliders-hor_fill.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fltk-widgets-valuators-sliders-hor_fill.adb b/src/fltk-widgets-valuators-sliders-hor_fill.adb index fab2a1c..7f520e8 100644 --- a/src/fltk-widgets-valuators-sliders-hor_fill.adb +++ b/src/fltk-widgets-valuators-sliders-hor_fill.adb @@ -59,7 +59,7 @@ package body FLTK.Widgets.Valuators.Sliders.Hor_Fill is free_fl_hor_fill_slider (This.Void_Ptr); This.Void_Ptr := System.Null_Address; end if; - Finalize (Valuator (This)); + Finalize (Slider (This)); end Finalize; |