Item11690: do not double urlEncode param name, and urlDecode trace ou…

…tput in Foswiki::Request::Cache to match appearance of input

git-svn-id: http://svn.foswiki.org/branches/Release01x01@14494 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

core/lib/Foswiki/Request.pm

@@ -570,7 +570,7 @@ sub header {
 
 ---++ ObjectMethod save( $fh )
 
-Saves object state to filehandle. Object may be loaded latter
+Saves object state to filehandle. Object may be loaded later
 passing $fh to new constructor or by calling load().
 
 =cut
@@ -579,10 +579,9 @@ sub save {
     my ( $this, $fh ) = @_;
     local ( $\, $, ) = ( '', '' );
     foreach my $name ( $this->param ) {
-        my $key = Foswiki::urlEncode($name);
         foreach my $value ( $this->param($name) ) {
             $value = '' unless defined $value;
-            print $fh Foswiki::urlEncode($key), '=',
+            print $fh Foswiki::urlEncode($name), '=',
               Foswiki::urlEncode($value), "\n";
         }
     }

core/lib/Foswiki/Request/Cache.pm

@@ -144,7 +144,7 @@ sub load {
             my $here = tell $F;
             while ( my $l = <$F> ) {
                 last if $l =~ /^=/;
-                print STDERR "CACHE $uid< $l";
+                print STDERR "CACHE $uid< " . Foswiki::urlDecode($l);
             }
             seek( $F, $here, 0 );
         }