File TimeDate-deprecated_array_use.patch of Package perl-TimeDate

diff -ruN TimeDate-1.20-orig/lib/Date/Format.pm TimeDate-1.20/lib/Date/Format.pm
--- TimeDate-1.20-orig/lib/Date/Format.pm	2009-12-12 12:30:06.000000000 +0000
+++ TimeDate-1.20/lib/Date/Format.pm	2010-04-20 21:15:56.049364922 +0000
@@ -83,7 +83,7 @@
    $tzname = sprintf("%+05d",$tzname)
 	unless($tzname =~ /\D/);
 
-   $epoch = timegm(@{$time}[0..5]);
+   $epoch = timegm( @$time[0], @$time[1], @$time[2], @$time[3], @$time[4], @$time[5] );
 
    @$me = gmtime($epoch + tz_offset($tzname) - tz_offset());
   }
openSUSE Build Service is sponsored by