X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses__adb.htm;fp=doc%2Fhtml%2Fada%2Fterminal_interface-curses__adb.htm;h=1f5e7c3ed45e5195e33441977bf8a4c6d1670978;hp=53636619a0785e077746585b289aca26d5b34107;hb=75a9c36c205ebefe07580acd0b1053a2abbd44b9;hpb=382c1d0c3c8959d2e5ffb69e86469d00937aa4ae
diff --git a/doc/html/ada/terminal_interface-curses__adb.htm b/doc/html/ada/terminal_interface-curses__adb.htm
index 53636619..1f5e7c3e 100644
--- a/doc/html/ada/terminal_interface-curses__adb.htm
+++ b/doc/html/ada/terminal_interface-curses__adb.htm
@@ -24,7 +24,7 @@
-
+
@@ -53,8 +53,8 @@
-
-
+
+
with System;
@@ -579,7 +579,7 @@
L : constant Special_Key_Code := Special_Key_Code (Natural (Key_F0) +
Natural (Function_Key_Number'Last));
begin
- if (Key >= Key_F0) and then (Key <= L) then
+ if Key >= Key_F0 and then Key <= L then
return True;
else
return False;