ncurses 5.8 - patch 20110319

[ncurses.git] / Ada95 / src / terminal_interface-curses-forms-field_types-user.adb

diff --git a/Ada95/src/terminal_interface-curses-forms-field_types-user.adb b/Ada95/src/terminal_interface-curses-forms-field_types-user.adb
index 31874a5d4f6421fc787232b9f88166ffd0ac9ef7..f544637bae0d36875af8358aff4ef4551fd1eb32 100644 (file)
--- a/Ada95/src/terminal_interface-curses-forms-field_types-user.adb
+++ b/Ada95/src/terminal_interface-curses-forms-field_types-user.adb
@@ -54,7 +54,7 @@ package body Terminal_Interface.Curses.Forms.Field_Types.User is
                              Cft  : C_Field_Type := C_Generic_Type;
                              Arg1 : Argument_Access)
                              return C_Int;
                              Cft  : C_Field_Type := C_Generic_Type;
                              Arg1 : Argument_Access)
                              return C_Int;

-      pragma Import (C, Set_Fld_Type, "set_field_type");
+      pragma Import (C, Set_Fld_Type, "set_field_type_user");

 
       Res : Eti_Error;
 
 
       Res : Eti_Error;