rpms/GtkAda/devel GtkAda-case-none.patch, NONE, 1.1 GtkAda.spec, 1.12, 1.13

[Gérard Milmeister (gemi)]

Author: gemi

Update of /cvs/extras/rpms/GtkAda/devel
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv14823

Modified Files:
	GtkAda.spec 
Added Files:
	GtkAda-case-none.patch 
Log Message:


GtkAda-case-none.patch:

--- NEW FILE GtkAda-case-none.patch ---
--- GtkAda-2.4.0/src/gtkada-mdi.adb.case-none	2006-02-01 22:54:59.000000000 +0100
+++ GtkAda-2.4.0/src/gtkada-mdi.adb	2006-02-01 22:55:31.000000000 +0100
@@ -4778,6 +4778,8 @@
             when Top | Bottom =>
                Widths (Side)  := 0;
                Heights (Side) := Get_Allocation_Height (MDI.Docks (Side));
+            when None =>
+               null;
          end case;
 
          --  If not allocated yet


Index: GtkAda.spec
===================================================================
RCS file: /cvs/extras/rpms/GtkAda/devel/GtkAda.spec,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -r1.12 -r1.13
--- GtkAda.spec	1 Feb 2006 20:14:33 -0000	1.12
+++ GtkAda.spec	1 Feb 2006 21:58:08 -0000	1.13
@@ -1,6 +1,6 @@
 Name:		GtkAda
 Version:	2.4.0
-Release:	8
+Release:	9
 
 Summary:	Ada95 graphical toolkit based on Gtk+
 
@@ -8,6 +8,7 @@
 License:	GPL
 URL:		http://libre.act-europe.fr/GtkAda
 Source:         http://libre.act-europe.fr/GtkAda/GtkAda-2.4.0.tgz
+Patch0:		GtkAda-case-none.patch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 BuildRequires:  gcc-gnat
 BuildRequires:  libgnat
@@ -39,6 +40,7 @@
 
 %prep
 %setup -q
+%patch0 -p1 -b .case-none
 
 %build
 %configure
@@ -121,6 +123,9 @@
 %doc known-problems
 
 %changelog
+* Wed Feb  1 2006 Gerard Milmeister <gemi at bluewin.ch> - 2.4.0-9
+- patch to handle all cases
+
 * Thu May 12 2005 Thorsten Leemhuis <fedora[AT]leemhuis.info> 2.4.0-6
 - Add excludearch ppc ppc64 (no gcc-gnat currently for those) #157550