X-Git-Url: https://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses__adb.htm;h=a0be638f131c603c966e81fedb8d7eadb53f29fc;hb=refs%2Ftags%2Fv5.2;hp=145e2a358b7d232c81b9ba0a30c5edb7caf66863;hpb=b1f61d9f3aa244512045a6b02e759825d7049d34;p=ncurses.git
diff --git a/doc/html/ada/terminal_interface-curses__adb.htm b/doc/html/ada/terminal_interface-curses__adb.htm
index 145e2a35..a0be638f 100644
--- a/doc/html/ada/terminal_interface-curses__adb.htm
+++ b/doc/html/ada/terminal_interface-curses__adb.htm
@@ -39,7 +39,7 @@
------------------------------------------------------------------------------
-- Author: Jürgen Pfeifer <<juergen.pfeifer@gmx.net>> 1996
-- Version Control:
--- @Revision: 1.25 @
+-- @Revision: 1.26 @
-- Binding Version 01.00
------------------------------------------------------------------------------
with System;
@@ -926,7 +926,7 @@
when Non_Blocking => Time := 0;
when Delayed =>
if Amount = 0 then
- raise CONSTRAINT_ERROR;
+ raise Constraint_Error;
end if;
Time := C_Int (Amount);
end case;