develooper Front page | perl.php.sandwich.dev | Postings from October 2005

[svn:PHP-Sandwich] r2162 - PHP-Sandwich/trunk/t

From:
theory
Date:
October 21, 2005 22:53
Subject:
[svn:PHP-Sandwich] r2162 - PHP-Sandwich/trunk/t
Message ID:
20051022055302.16892.qmail@x1.develooper.com
Author: theory
Date: Fri Oct 21 22:53:02 2005
New Revision: 2162

Modified:
   PHP-Sandwich/trunk/t/test_perl_classes.t
Log:
Indentation.


Modified: PHP-Sandwich/trunk/t/test_perl_classes.t
==============================================================================
--- PHP-Sandwich/trunk/t/test_perl_classes.t	(original)
+++ PHP-Sandwich/trunk/t/test_perl_classes.t	Fri Oct 21 22:53:02 2005
@@ -24,7 +24,7 @@ ok my $ret = $php->eval(q^
     $file = $perl->call('file');
     $fh = $perl->new("IO::File", "<$file");
     if ($fh) {
-	return $fh->getline();
+        return $fh->getline();
     } else {
         throw new Exception("Couldn't open $file");
     }
@@ -37,7 +37,7 @@ ok $ret = $php->eval(q^
     $file = $perl->call('file');
     $fh = $perl->call("IO::File::new", "IO::File", "<$file");
     if ($fh) {
-	return $fh->getline();
+        return $fh->getline();
     } else {
         throw new Exception("Couldn't open $file");
     }
@@ -51,7 +51,7 @@ ok $ret = $php->eval(q^
     $file = $perl->call('file');
     $fh = $perl->eval("return IO::File->new(\"<$file\");");
     if ($fh) {
-	return $fh->getline();
+        return $fh->getline();
     } else {
         throw new Exception("Couldn't open $file");
     }



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About