X-Git-Url: http://git.shiar.nl/perl/plp/.git/blobdiff_plain/60df7c89bf8eb6f20a41600a6186a990561eb77a..5d1c2193a6c3c98cf426e03eb783eace183e5a0c:/PLP/Functions.pm

diff --git a/PLP/Functions.pm b/PLP/Functions.pm
index fe1f39c..3eb07ca 100644
--- a/PLP/Functions.pm
+++ b/PLP/Functions.pm
@@ -52,8 +52,8 @@ sub DecodeURI (@) {
 	my $ref = defined wantarray ? [@_] : \@_;
 	for (@$ref) {
 		eval {
-			s/\+/%20/g;  # Browsers do y/ /+/ - I don't care about RFC's, but
-			             # I do care about real-life situations.
+			tr/+/ /;  # Browsers do tr/ /+/ - I don't care about RFCs, but
+			          # I do care about real-life situations.
 			s/%([0-9A-Fa-f][0-9A-Fa-f])/chr hex $1/ge;
 		};
 	}