for chnanen
Marcus Ramberg [Mon, 25 Jul 2005 11:27:25 +0000 (11:27 +0000)]
lib/HTTP/Body/MultiPart.pm [moved from lib/HTTP/Body/Multipart.pm with 100% similarity]
lib/HTTP/Body/OctetStream.pm [moved from lib/HTTP/Body/Octetstream.pm with 100% similarity]
lib/HTTP/Body/UrlEncoded.pm [moved from lib/HTTP/Body/Urlencoded.pm with 94% similarity]

similarity index 94%
rename from lib/HTTP/Body/Urlencoded.pm
rename to lib/HTTP/Body/UrlEncoded.pm
index c20e955..db72930 100644 (file)
@@ -4,7 +4,7 @@ use strict;
 use base 'HTTP::Body';
 use bytes;
 
-our $DECODE = qr/%u?([0-9a-fA-F]{2,4})/;
+our $DECODE = qr/%(u?[0-9a-fA-F]{2,4})/;
 
 sub spin {
     my $self = shift;