X-Git-Url: http://ncurses.scripts.mit.edu/?a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-alpha__ads.htm;fp=Ada95%2Fhtml%2Fada%2Fterminal_interface-curses-forms-field_types-alpha__ads.htm;h=a16a211b2f2df64ea4d96b123240741c1745d9b2;hb=b1f61d9f3aa244512045a6b02e759825d7049d34;hp=a3a090f92402594a99a13439b69a89fe2eebefff;hpb=0eb88fc5281804773e2a0c7a488a4452463535ce;p=ncurses.git diff --git a/Ada95/html/ada/terminal_interface-curses-forms-field_types-alpha__ads.htm b/doc/html/ada/terminal_interface-curses-forms-field_types-alpha__ads.htm similarity index 90% rename from Ada95/html/ada/terminal_interface-curses-forms-field_types-alpha__ads.htm rename to doc/html/ada/terminal_interface-curses-forms-field_types-alpha__ads.htm index a3a090f9..a16a211b 100644 --- a/Ada95/html/ada/terminal_interface-curses-forms-field_types-alpha__ads.htm +++ b/doc/html/ada/terminal_interface-curses-forms-field_types-alpha__ads.htm @@ -1,4 +1,4 @@ -terminal_interface-curses-forms-field_types-alpha.ads +terminal_interface-curses-forms-field_types-alpha.ads

File : terminal_interface-curses-forms-field_types-alpha.ads


@@ -37,7 +37,7 @@
 -- sale, use or other dealings in this Software without prior written       --
 -- authorization.                                                           --
 ------------------------------------------------------------------------------
---  Jürgen Pfeifer (juergen.pfeifer@gmx.net) 1996                          --
+--  Author: Jürgen Pfeifer <<juergen.pfeifer@gmx.net>> 1996
 --  Version Control:
 --  @Revision: 1.9 @
 --  Binding Version 01.00
@@ -47,11 +47,11 @@
 
    type Alpha_Field is new Field_Type
      with record
-        Minimum_Field_Width : Natural := 0;
+        Minimum_Field_Width : Natural := 0;
      end record;
 
-   procedure Set_Field_Type (Fld : in Field;
-                             Typ : in Alpha_Field);
+   procedure Set_Field_Type (Fld : in Field;
+                             Typ : in Alpha_Field);
    pragma Inline (Set_Field_Type);
 
 end Terminal_Interface.Curses.Forms.Field_Types.Alpha;