Changeset 17088

Timestamp:

2008-08-29T13:11:43+12:00 (16 years ago)

Author:

davidb

Message:

Plugin modified to only print out URL encoded filename if different to original filename.

File:

• gsdl/trunk/perllib/plugins/HTMLPlugin.pm (modified) (1 diff)

gsdl/trunk/perllib/plugins/HTMLPlugin.pm

@@ -623 +623 @@
 #   print STDERR "**** utf8_encoded_link to original src filename:\n\t$utf8_link\n\t".$self->{'utf8_to_original_filename'}->{$utf8_link}."\n";
 
+    if ($url_original_filename ne $utf8_link) {
+        my $outhandle = $self->{'outhandle'};
+
+        print $outhandle "URL Encoding $url_original_filename\n";
+        print $outhandle " ->$utf8_link\n";
+    }
+
     $block_hash->{'file_blocks'}->{$url_original_filename} = 1;
     }