]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - Ada95/samples/sample-curses_demo-attributes.adb
ncurses 5.9 - patch 20130921
[ncurses.git] / Ada95 / samples / sample-curses_demo-attributes.adb
index 9b9089a598ca164618298a0234142ddf21fd71ee..c49f37d6024638d171c8862f1c2c6e1a09fbf3dc 100644 (file)
 -- sale, use or other dealings in this Software without prior written       --
 -- authorization.                                                           --
 ------------------------------------------------------------------------------
 -- sale, use or other dealings in this Software without prior written       --
 -- authorization.                                                           --
 ------------------------------------------------------------------------------
---  Author: Juergen Pfeifer <Juergen.Pfeifer@T-Online.de> 1996
+--  Author:  Juergen Pfeifer, 1996
 --  Version Control
 --  Version Control
---  $Revision: 1.7 $
---  Binding Version 00.93
+--  $Revision: 1.12 $
+--  Binding Version 01.00
 ------------------------------------------------------------------------------
 with Terminal_Interface.Curses; use Terminal_Interface.Curses;
 with Terminal_Interface.Curses.Panels;  use Terminal_Interface.Curses.Panels;
 
 with Sample.Manifest; use Sample.Manifest;
 ------------------------------------------------------------------------------
 with Terminal_Interface.Curses; use Terminal_Interface.Curses;
 with Terminal_Interface.Curses.Panels;  use Terminal_Interface.Curses.Panels;
 
 with Sample.Manifest; use Sample.Manifest;
-with Sample.Helpers; use Sample.Helpers;
 with Sample.Function_Key_Setting; use Sample.Function_Key_Setting;
 with Sample.Keyboard_Handler; use Sample.Keyboard_Handler;
 with Sample.Function_Key_Setting; use Sample.Function_Key_Setting;
 with Sample.Keyboard_Handler; use Sample.Keyboard_Handler;
-with Sample.Header_Handler; use Sample.Header_Handler;
 with Sample.Explanation; use Sample.Explanation;
 
 with Sample.Explanation; use Sample.Explanation;
 
-with Sample.Menu_Demo.Handler;
-with Sample.Curses_Demo.Mouse;
-
 package body Sample.Curses_Demo.Attributes is
 
    procedure Demo
 package body Sample.Curses_Demo.Attributes is
 
    procedure Demo