]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - Ada95/src/terminal_interface-curses-text_io.adb
ncurses 5.2
[ncurses.git] / Ada95 / src / terminal_interface-curses-text_io.adb
index 3d829a57aa6029194d6c02f58a18e9c615fccc86..cf7614b400fbabf9997da8ce03f3ef170c82dc1f 100644 (file)
@@ -35,7 +35,7 @@
 ------------------------------------------------------------------------------
 --  Author: Juergen Pfeifer <juergen.pfeifer@gmx.net> 1996
 --  Version Control:
---  $Revision: 1.11 $
+--  $Revision: 1.12 $
 --  Binding Version 01.00
 ------------------------------------------------------------------------------
 package body Terminal_Interface.Curses.Text_IO is
@@ -135,7 +135,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;