X-Git-Url: http://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-terminfo__adb.htm;h=049e1541bcd748750af5a287258f98354b379e56;hb=29ee95cea37c4bbf2014a35677d9a0750c6b52a8;hp=110367102449e3863ea2263456797d4a2e02fcda;hpb=77afe78361875f531dc2bf8d73f2e781c8e76176;p=ncurses.git
diff --git a/doc/html/ada/terminal_interface-curses-terminfo__adb.htm b/doc/html/ada/terminal_interface-curses-terminfo__adb.htm
index 11036710..049e1541 100644
--- a/doc/html/ada/terminal_interface-curses-terminfo__adb.htm
+++ b/doc/html/ada/terminal_interface-curses-terminfo__adb.htm
@@ -46,8 +46,8 @@
------------------------------------------------------------------------------
with Terminal_Interface.Curses.Aux; use Terminal_Interface.Curses.Aux;
-with Interfaces.C; use Interfaces.C;
-with Interfaces.C.Strings; use Interfaces.C.Strings;
+with Interfaces.C; use Interfaces.C;
+with Interfaces.C.Strings; use Interfaces.C.Strings;
with Ada.Unchecked_Conversion;
package body Terminal_Interface.Curses.Terminfo is
@@ -100,7 +100,7 @@
if Txt2 = Null_Ptr then
Result := False;
elsif Is_MinusOne_Pointer (Txt2) then
- raise Curses_Exception;
+ raise Curses_Exception;
else
Value := Terminfo_String (Fill_String (Txt2));
Result := True;
@@ -121,7 +121,7 @@
if Txt2 = Null_Ptr then
return False;
elsif Is_MinusOne_Pointer (Txt2) then
- raise Curses_Exception;
+ raise Curses_Exception;
else
return True;
end if;
@@ -159,7 +159,7 @@
Err := tputs (Txt, C_Int (affcnt), putc);
end if;
if Err = Curses_Err then
- raise Curses_Exception;
+ raise Curses_Exception;
end if;
end Put_String;