ncurses 5.3

[ncurses.git] / Ada95 / src / terminal_interface-curses-text_io.adb

diff --git a/Ada95/src/terminal_interface-curses-text_io.adb b/Ada95/src/terminal_interface-curses-text_io.adb
index 3d829a57aa6029194d6c02f58a18e9c615fccc86..01076921c6170f0f110a31418a83de58fc53d18b 100644 (file)
--- a/Ada95/src/terminal_interface-curses-text_io.adb
+++ b/Ada95/src/terminal_interface-curses-text_io.adb
@@ -33,9 +33,10 @@
 -- sale, use or other dealings in this Software without prior written       --
 -- authorization.                                                           --
 ------------------------------------------------------------------------------
---  Author: Juergen Pfeifer <juergen.pfeifer@gmx.net> 1996
+--  Author:  Juergen Pfeifer, 1996
+--  Contact: http://www.familiepfeifer.de/Contact.aspx?Lang=en
 --  Version Control:
---  $Revision: 1.11 $
+--  $Revision: 1.13 $
 --  Binding Version 01.00
 ------------------------------------------------------------------------------
 package body Terminal_Interface.Curses.Text_IO is
@@ -135,7 +136,7 @@ package body Terminal_Interface.Curses.Text_IO is
          if P_Size > 0 and then Line (Win) >= P_Size then
             New_Page (Win);
          else
-            Add (Win, Ascii.LF);
+            Add (Win, ASCII.LF);
          end if;
       end loop;
    end New_Line;