summaryrefslogtreecommitdiff
path: root/src/fltk-widgets-groups-help_views.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/fltk-widgets-groups-help_views.adb')
-rw-r--r--src/fltk-widgets-groups-help_views.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fltk-widgets-groups-help_views.adb b/src/fltk-widgets-groups-help_views.adb
index b5ed154..715e2ca 100644
--- a/src/fltk-widgets-groups-help_views.adb
+++ b/src/fltk-widgets-groups-help_views.adb
@@ -423,7 +423,7 @@ package body FLTK.Widgets.Groups.Help_Views is
if Code = -1 then
raise Load_Help_Error;
elsif Code /= 0 then
- raise Program_Error;
+ raise Internal_FLTK_Error;
end if;
end Load;