[svn:PHP-Sandwich] r2162 - PHP-Sandwich/trunk/t
[email protected] 22 Oct 2005 05:53:02 -0000
| Newsgroups | perl.php.sandwich.dev |
|---|---|
| Message-ID | <[email protected]> |
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");
}