From ce287c99ae15137138e2c5674f8f84a9c8bc1609 Mon Sep 17 00:00:00 2001 From: Jedidiah Barber Date: Tue, 15 Apr 2025 17:23:52 +1200 Subject: Constants marked constant, code style improvements, redundant with clauses removed --- src/windows-about.ads | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'src/windows-about.ads') diff --git a/src/windows-about.ads b/src/windows-about.ads index 27e655b..00b26dd 100644 --- a/src/windows-about.ads +++ b/src/windows-about.ads @@ -19,15 +19,15 @@ package Windows.About is private - type About_Window is new Window with - record - Picture : FLTK.Widgets.Boxes.Box; - Heading : FLTK.Widgets.Boxes.Box; - Blurb : FLTK.Widgets.Boxes.Box; - Author : FLTK.Widgets.Boxes.Box; - Dismiss : FLTK.Widgets.Buttons.Enter.Enter_Button; - end record; + type About_Window is new Window with record + Picture : FLTK.Widgets.Boxes.Box; + Heading : FLTK.Widgets.Boxes.Box; + Blurb : FLTK.Widgets.Boxes.Box; + Author : FLTK.Widgets.Boxes.Box; + Dismiss : FLTK.Widgets.Buttons.Enter.Enter_Button; + end record; end Windows.About; + -- cgit