diff options
| author | Jedidiah Barber <contact@jedbarber.id.au> | 2024-12-01 13:34:58 +1300 |
|---|---|---|
| committer | Jedidiah Barber <contact@jedbarber.id.au> | 2024-12-01 13:34:58 +1300 |
| commit | df63542510b6912405f3709b204ad3a59548c917 (patch) | |
| tree | f5b1fb7b64a7613b1d7de990c22d9c78a5b95292 /src/fltk-widgets-groups-help_views.adb | |
| parent | ba29d58fb21f0f376dd4c09df61b4e1d38cb1226 (diff) | |
Improved specificity of exceptions with Internal_FLTK_Error and Storage_Error
Diffstat (limited to 'src/fltk-widgets-groups-help_views.adb')
| -rw-r--r-- | src/fltk-widgets-groups-help_views.adb | 2 |
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; |