]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - Ada95/samples/sample-explanation.ads
ncurses 5.6
[ncurses.git] / Ada95 / samples / sample-explanation.ads
index 1e20f0517b0b81619ef1c747e2f8fa0f32050f73..18617ac46add4a5d5066780639a09995ad342444 100644 (file)
 -- sale, use or other dealings in this Software without prior written       --
 -- authorization.                                                           --
 ------------------------------------------------------------------------------
---  Author: Juergen Pfeifer <juergen.pfeifer@gmx.net> 1996
+--  Author:  Juergen Pfeifer, 1996
 --  Version Control
---  $Revision: 1.7 $
+--  $Revision: 1.10 $
 --  Binding Version 01.00
 ------------------------------------------------------------------------------
 --  Poor mans help system. This scans a sequential file for key lines and
 --  then reads the lines up to the next key. Those lines are presented in
 --  a window as help or explanation.
 --
-with Terminal_Interface.Curses;
-
 package Sample.Explanation is
 
-   package Curses renames Terminal_Interface.Curses;
-
    procedure Explain (Key : in String);
    --  Retrieve the text associated with this key and display it.