cvsuser 05/09/18 18:34:54
Modified: App-Options/t main.t
Log:
removed some tests that fail on win32
Revision Changes Path
1.10 +7 -7 p5ee/App-Options/t/main.t
Index: main.t
===================================================================
RCS file: /cvs/public/p5ee/App-Options/t/main.t,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- main.t 22 May 2005 12:50:51 -0000 1.9
+++ main.t 19 Sep 2005 01:34:54 -0000 1.10
@@ -58,18 +58,18 @@
is($App::options{var12}, "value12", "specified env var works");
is($App::options{var10}, "value10", "specified secondary env var works");
-open(FILE2, "< $dir/file.txt");
-$file_txt = join("", <FILE2>);
-close(FILE2);
+#open(FILE2, "< $dir/file.txt");
+#$file_txt = join("", <FILE2>);
+#close(FILE2);
#is($App::options{var21}, $file_txt, "value from file");
#is($App::options{var22}, $file_txt, "value from file (2)");
#ok($App::options{var23} eq $file_txt || $App::options{var23} =~ /open/,
"value from command");
-$var24 = <<EOF;
-This is text
-and more text
-EOF
+#$var24 = <<EOF;
+#This is text
+#and more text
+#EOF
#is($App::options{var24}, $var24, "value from here doc");
#is($App::options{var25}, $var24, "value from line continuations");
#is($App::options{var26}, "normal", "back to normal");