[GtkAda/el6] Patched out a couple unimportant pragmas to work around a bug in Gnat.

[Björn Persson]

commit c3386c691188e9fbcb378f69e760bfd1272741a8
Author: Björn Persson <bjorn at rombobjörn.se>
Date:   Tue Jul 5 23:03:13 2011 +0200

    Patched out a couple unimportant pragmas to work around a bug in Gnat.

 GtkAda-2.14.1-minus_obsolescent.patch |   14 ++++++++++++++
 GtkAda.spec                           |    4 ++++
 2 files changed, 18 insertions(+), 0 deletions(-)
---
diff --git a/GtkAda-2.14.1-minus_obsolescent.patch b/GtkAda-2.14.1-minus_obsolescent.patch
new file mode 100644
index 0000000..09a84c9
--- /dev/null
+++ b/GtkAda-2.14.1-minus_obsolescent.patch
@@ -0,0 +1,14 @@
+--- src/gtk-about_dialog.ads	2010-06-11 13:15:13.000000000 +0200
++++ src/gtk-about_dialog.ads	2010-09-18 22:37:28.000000000 +0200
+@@ -229,11 +229,9 @@
+    procedure Set_Name
+      (About : access Gtk_About_Dialog_Record; Name  : String)
+      renames Set_Program_Name;
+-   pragma Obsolescent; --  Set_Name
+    function Get_Name
+      (About : access Gtk_About_Dialog_Record) return String
+      renames Get_Program_Name;
+-   pragma Obsolescent; --  Get_Name
+    --  Returns the program name displayed in the about dialog.
+ 
+    ----------------
diff --git a/GtkAda.spec b/GtkAda.spec
index 590a161..7de7986 100644
--- a/GtkAda.spec
+++ b/GtkAda.spec
@@ -17,6 +17,8 @@ Patch2:         GtkAda-2.14.1-multilib_gtkada-config.patch
 # Patch to fix implicit DSO linking, proposed upstream 2010-02-16:
 # http://lists.adacore.com/pipermail/gtkada/2010-February/003871.html
 Patch3:         GtkAda-2.14.0-lm.patch
+# Workaround for a Gnat bug that seems to be fixed in later versions:
+Patch4:         GtkAda-2.14.1-minus_obsolescent.patch
 # Patch for a more flexible build system, proposed upstream 2011-02-14:
 # http://lists.adacore.com/pipermail/gtkada/2011-February/003969.html
 Patch5:         GtkAda-2.14.1-configuration-3.patch
@@ -101,6 +103,7 @@ Documentation for GtkAda.
 %patch1
 %patch2
 %patch3
+%patch4
 find -name .cvsignore | xargs rm -fr
 
 %build
@@ -178,6 +181,7 @@ rm -rf $RPM_BUILD_ROOT%{_datadir}/examples
 * Tue Jul 05 2011 Björn Persson <bjorn at rombobjörn.se> - 2.14.1-8.el6.1
 - Branched for EPEL 6.
 - Removed the patch for GTK+ 2.21.
+- Worked around a Gnat bug.
 
 * Sun May 22 2011 Björn Persson <bjorn at rombobjörn.se> - 2.14.1-7.1
 - Removed some obsolete stuff.