File escaped_characters.patch of Package perl-Net-HTTPServer

diff -Naur perl-Net-Http-Server-1.1.1.orig//lib/Net/HTTPServer/Request.pm perl-Net-Http-Server-1.1.1/lib/Net/HTTPServer/Request.pm
--- perl-Net-Http-Server-1.1.1.orig//lib/Net/HTTPServer/Request.pm	2005-01-25 18:13:38.000000000 +0100
+++ perl-Net-Http-Server-1.1.1/lib/Net/HTTPServer/Request.pm	2008-09-15 13:56:28.000000000 +0200
@@ -340,7 +340,7 @@
     #-------------------------------------------------------------------------
     # What did they ask for?
     #-------------------------------------------------------------------------
-    $self->{PATH} = $self->_chroot($uri->path());
+    $self->{PATH} = $self->_chroot(uri_unescape($uri->path()));
 
     my ($headers,$body) = ($self->{REQUEST} =~ /^(.+?)\015?\012\015?\012(.*?)$/s);