diff options
| author | Tobi Oetiker <tobi@oetiker.ch> | 2008-06-10 15:01:02 +0200 |
|---|---|---|
| committer | Tobi Oetiker <tobi@oetiker.ch> | 2008-06-10 15:01:02 +0200 |
| commit | 8d5f45365467584b313528c60c6f3a902e02c1a4 (patch) | |
| tree | 5b17c7612e90e3bef96ee0e3ce36e1f4d7bd6bdf /qooxdoo/source/perl | |
| parent | 761d11b28863424cc69f853dce7db9dbadfadba9 (diff) | |
| download | smokeping-8d5f45365467584b313528c60c6f3a902e02c1a4.tar.gz smokeping-8d5f45365467584b313528c60c6f3a902e02c1a4.tar.xz | |
removed another debug print
Diffstat (limited to 'qooxdoo/source/perl')
| -rw-r--r-- | qooxdoo/source/perl/Qooxdoo/Services/Tr.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm b/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm index a8e3c10..f3a5b47 100644 --- a/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm +++ b/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm @@ -109,7 +109,7 @@ sub method_run_tr # print STDERR "$again, $handle, $size, $point\n"; $rounds ++; } while ($again and $point >= $size); - print STDERR "$point > $size\n"; + # print STDERR "$point > $size\n"; if (seek $fh, $point,0){ while (<$fh>){ #print STDERR ">$_<"; |