Author: awjb
Update of /cvs/pkgs/rpms/perl-Tk/devel
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv30888/devel
Modified Files:
perl-Tk.spec
Added Files:
perl-Tk-events.patch
Log Message:
- fix events (#489228, #491536, #506496)
perl-Tk-events.patch:
--- NEW FILE perl-Tk-events.patch ---
--- pTk/mTk/generic/tk.h.orig 2007-05-05 20:41:02.000000000 +0200
+++ pTk/mTk/generic/tk.h 2008-08-27 03:16:31.000000000 +0200
@@ -677,17 +677,15 @@
*
*---------------------------------------------------------------------------
*/
-#define VirtualEvent (LASTEvent)
-#define ActivateNotify (LASTEvent + 1)
-#define DeactivateNotify (LASTEvent + 2)
-#define MouseWheelEvent (LASTEvent + 3)
-#define TK_LASTEVENT (LASTEvent + 4)
+#define VirtualEvent (MappingNotify + 1)
+#define ActivateNotify (MappingNotify + 2)
+#define DeactivateNotify (MappingNotify + 3)
+#define MouseWheelEvent (MappingNotify + 4)
+#define TK_LASTEVENT (MappingNotify + 5)
#define MouseWheelMask (1L << 28)
-
#define ActivateMask (1L << 29)
#define VirtualEventMask (1L << 30)
-#define TK_LASTEVENT (LASTEvent + 4)
/*
Index: perl-Tk.spec
===================================================================
RCS file: /cvs/pkgs/rpms/perl-Tk/devel/perl-Tk.spec,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -p -r1.17 -r1.18
--- perl-Tk.spec 19 Mar 2009 14:54:33 -0000 1.17
+++ perl-Tk.spec 22 Jun 2009 16:43:03 -0000 1.18
@@ -3,7 +3,7 @@
Name: perl-Tk
Version: 804.028
-Release: 7%{?dist}
+Release: 8%{?dist}
Summary: Perl Graphical User Interface ToolKit
Group: Development/Libraries
@@ -17,6 +17,9 @@ Patch1: perl-Tk-debian.patch.gz
Patch2: perl-Tk-seg.patch
# fix interaction with XIM, bug #489228, upstream change r12589
Patch3: perl-Tk-XIM.patch
+# fix for bugs #491536 & #489228 & #506496 (see comment #8)
+# see http://rt.cpan.org/Public/Bug/Display.html?id=38746
+Patch4: perl-Tk-events.patch
# fix gif overflow in tk see CVE-2006-4484 and CVE-2007-6697 or #431518 and
# #431529
@@ -60,6 +63,7 @@ chmod -x pod/Popup.pod Tixish/lib/Tk/bal
# patch to fix #235666 ... seems like caching code is broken
%patch2 -p1 -b .seg
%patch3 -p1 -b .xim
+%patch4 -b .events
%patch100
%build
@@ -105,6 +109,10 @@ rm -rf $RPM_BUILD_ROOT
%exclude %{perl_vendorarch}/Tk/reindex.pl
%changelog
+* Mon Jun 15 2009 Andreas Bierfert <andreas.bierfert[AT]lowlatency.de>
+- 804.028-8
+- fix events (#489228, #491536, #506496)
+
* Thu Mar 19 2009 Stepan Kasal <skasal@xxxxxxxxxx> - 804.028-7
- perl-Tk-XIM.patch (#489228)
--
Fedora Extras Perl SIG
http://www.fedoraproject.org/wiki/Extras/SIGs/Perl
Fedora-perl-devel-list mailing list
Fedora-perl-devel-list@xxxxxxxxxx
https://www.redhat.com/mailman/listinfo/fedora-perl-devel-list
