]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - Ada95/samples/sample-explanation.ads
ncurses 5.2
[ncurses.git] / Ada95 / samples / sample-explanation.ads
index 1e20f0517b0b81619ef1c747e2f8fa0f32050f73..24a0e177d44a1dee68701237aa3d53881b19871d 100644 (file)
 ------------------------------------------------------------------------------
 --  Author: Juergen Pfeifer <juergen.pfeifer@gmx.net> 1996
 --  Version Control
---  $Revision: 1.7 $
+--  $Revision: 1.8 $
 --  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.