merryxmas schrieb:
> hello
> are there any plans to update win32-gui to support the new perl 5.10
The cygwin package is already updated. Under [Experimental] so far as
perl also, until all remaining perl libraries have been updated.
Just a few required patches:
--- perl-Win32-GUI-1.05/GUI.pm.orig 2006-11-05 20:04:50.000000000 +0000
+++ perl-Win32-GUI-1.05/GUI.pm 2007-12-25 14:35:13.546875000 +0000
@@ -421,9 +421,9 @@
my $direction = delete $options{-direction};
if(keys(%options) != 0) {
- require Carp;
- Carp::carp "Animate: Unrecognised options ".join(", ",
keys(%options));
- return undef
+ eval { use Carp; };
+ carp("Animate: Unrecognised options ".join(", ", keys(%options)));
+ return undef;
}
$show = 1 unless defined $show;
--- perl-Win32-GUI-1.05/Makefile.PL.orig 2006-11-02 20:36:58.000000000
+0000
+++ perl-Win32-GUI-1.05/Makefile.PL 2007-12-26 17:01:29.031250000 +0000
@@ -353,6 +353,7 @@
# -- Win32::GUI resource section --
GUI.res: GUI.rc
+ chmod u+w GUI.rc
windres -O coff -i GUI.rc -o GUI.res
RC_FRAG2
--- perl-Win32-GUI-1.05/Win32-GUI-Constants/Constants.pm.orig 2006-10-31
22:21:50.000000000 +0000
+++ perl-Win32-GUI-1.05/Win32-GUI-Constants/Constants.pm 2007-12-25
14:44:45.859375000 +0000
@@ -270,8 +270,8 @@
if($oops) {
# only require Carp if we need it
- require Carp;
- Carp::croak qq(Can't continue after import errors);
+ eval { use Carp; };
+ croak qq(Can't continue after import errors);
}
}
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
http://helsinki.at/ http://spacemovie.mur.at/
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2005.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
http://perl-win32-gui.sourceforge.net/
