svn commit: r106596 - /perl/modperl/trunk/t/response/TestPerl/ithreads.pm

[stas]

Author: stas
Date: Thu Nov 25 11:25:43 2004
New Revision: 106596

URL: http://svn.apache.org/viewcvs?view=rev&rev=106596
Log:
tidy up

Modified:
   perl/modperl/trunk/t/response/TestPerl/ithreads.pm

Modified: perl/modperl/trunk/t/response/TestPerl/ithreads.pm
Url: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/t/response/TestPerl/ithreads.pm?view=diff&rev=106596&p1=perl/modperl/trunk/t/response/TestPerl/ithreads.pm&r1=106595&p2=perl/modperl/trunk/t/response/TestPerl/ithreads.pm&r2=106596
==============================================================================
--- perl/modperl/trunk/t/response/TestPerl/ithreads.pm  (original)
+++ perl/modperl/trunk/t/response/TestPerl/ithreads.pm  Thu Nov 25 11:25:43 2004
@@ -17,7 +17,7 @@
 sub handler {
     my $r = shift;
 
-    plan $r, tests => 4,need 
+    plan $r, tests => 4, need
         need_threads,
         {"perl >= 5.8.1 is required (this is $])" => ($] >= 5.008001)};
 
@@ -38,7 +38,7 @@
 
     {
         my $thr = threads->new(sub {
-                                   my $tid = threads->self->tid; 
+                                   my $tid = threads->self->tid;
                                    debug "2nd TID is $tid" if defined $tid;
                                    return 2;
                                });