Changeset 18282 for gsdl/trunk
- Timestamp:
- 2008-12-19T13:48:37+13:00 (15 years ago)
- Location:
- gsdl/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/bin/script/gsConvert.pl
r18202 r18282 735 735 my ($pre, $text, $post) = @_; 736 736 737 $text =~ s/%20/ /g; # reinstated this line, since we no longer replace spaces with %20737 $text =~ s/%20/_/g; # reinstated this line, since we no longer replace spaces with %20. We replace them with underscores 738 738 $text =~ s/\\/\//g; 739 739 $text =~ s/%/%25/g; -
gsdl/trunk/perllib/unicode.pm
r18245 r18282 581 581 my ($text) = @_; 582 582 if (!&is_url_encoded($text)) { 583 $text =~ s/ /_/g; # spaces replaced with underscore 583 584 $text =~ s/([^A-Z0-9\ \.\-\_])/sprintf("%%%02X", ord($1))/iseg; 584 585 }
Note:
See TracChangeset
for help on using the changeset viewer.