Changeset 17088
- Timestamp:
- 2008-08-29T13:11:43+12:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/HTMLPlugin.pm
r16935 r17088 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"; 624 624 625 if ($url_original_filename ne $utf8_link) { 626 my $outhandle = $self->{'outhandle'}; 627 628 print $outhandle "URL Encoding $url_original_filename\n"; 629 print $outhandle " ->$utf8_link\n"; 630 } 631 625 632 $block_hash->{'file_blocks'}->{$url_original_filename} = 1; 626 633 }
Note:
See TracChangeset
for help on using the changeset viewer.