Changeset 16913


Ignore:
Timestamp:
2008-08-20T15:23:12+12:00 (16 years ago)
Author:
ak19
Message:

Removed my distracting debug statement

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/unicode.pm

    r16900 r16913  
    579579    my ($text) = @_;
    580580    if (!&is_url_encoded($text)) {
    581     print STDERR "*** not percent encoded yet\n";
    582581    $text =~ s/([^A-Z0-9\.\-\_])/sprintf("%%%02X", ord($1))/iseg;
    583582    }
Note: See TracChangeset for help on using the changeset viewer.