Changeset 16913

Show
Ignore:
Timestamp:
20.08.2008 15:23:12 (11 years ago)
Author:
ak19
Message:

Removed my distracting debug statement

Files:
1 modified

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    }