rpms/perl-libwww-perl/F-9 rt-38736_taint.patch,NONE,1.1

[Marcela Mašláňová]

Author: mmaslano

Update of /cvs/pkgs/rpms/perl-libwww-perl/F-9
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv1373

Added Files:
	rt-38736_taint.patch 
Log Message:
Forgot to add correct patch for taint problem.


rt-38736_taint.patch:

--- NEW FILE rt-38736_taint.patch ---
diff -up libwww-perl-5.816/lib/HTTP/Message.pm.ooo libwww-perl-5.816/lib/HTTP/Message.pm
--- libwww-perl-5.816/lib/HTTP/Message.pm.ooo	2008-10-07 10:47:51.000000000 +0200
+++ libwww-perl-5.816/lib/HTTP/Message.pm	2008-10-07 10:50:18.000000000 +0200
@@ -410,7 +410,7 @@ sub AUTOLOAD
     # We create the function here so that it will not need to be
     # autoloaded the next time.
     no strict 'refs';
-    *$method = eval "sub { shift->{'_headers'}->$method(\@_) }";
+    *$method = sub { shift->{'_headers'}->$method(@_) };
     goto &$method;
 }