Changeset 18401
- Timestamp:
- 2009-01-16T12:10:17+13:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugins/HTMLPlugin.pm
r18320 r18401 1149 1149 # of filenames, URL-encode the additional percent signs of the URL-encoded filename 1150 1150 my $newname_url = $newname; 1151 $newname_url = &unicode::filename_to_url($newname_url ); #$newname_url =~ s/%/%25/g if $newname_url !~ m/%25/;1151 $newname_url = &unicode::filename_to_url($newname_url, $self->{'file_rename_method'}); 1152 1152 return "_httpdocimg_/$newname_url"; 1153 1153 }
Note:
See TracChangeset
for help on using the changeset viewer.