From 619b3da9fbb37c57aedfc039cc813f6acf5569be Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Sun, 17 Nov 2024 17:15:53 +1300 Subject: Refactored Finalize subprograms and made note of potential future Widget issues there in fltk.ads --- src/fltk-widgets-groups-text_displays-text_editors.ads | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/fltk-widgets-groups-text_displays-text_editors.ads') diff --git a/src/fltk-widgets-groups-text_displays-text_editors.ads b/src/fltk-widgets-groups-text_displays-text_editors.ads index 67ea0e7..8eb604a 100644 --- a/src/fltk-widgets-groups-text_displays-text_editors.ads +++ b/src/fltk-widgets-groups-text_displays-text_editors.ads @@ -349,6 +349,9 @@ private X, Y, W, H : in Integer; Text : in String); + procedure Extra_Final + (This : in out Text_Editor); + function Key_Func_Hook (K : in Interfaces.C.int; -- cgit