[E-p-i-c-commits] org.epic.perleditor-test/workspace/EPICTest syntax.pl,1.1,1.2 test_OpenSub.pl,1.1,1.2

[Jan P. <jp...@us...>]

Update of /cvsroot/e-p-i-c/org.epic.perleditor-test/workspace/EPICTest
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29469/workspace/EPICTest

Modified Files:
	syntax.pl test_OpenSub.pl 
Log Message:
Tests updated to reflect changes committed to org.epic.perleditor.

Index: test_OpenSub.pl
===================================================================
RCS file: /cvsroot/e-p-i-c/org.epic.perleditor-test/workspace/EPICTest/test_OpenSub.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- test_OpenSub.pl	24 Dec 2005 00:01:42 -0000	1.1
+++ test_OpenSub.pl	25 Dec 2005 14:08:26 -0000	1.2
@@ -25,4 +25,4 @@
 		{ foo(); }
 =cut
 
-other_sub(some_sub());
\ No newline at end of file
+other_sub(&some_sub());
\ No newline at end of file

Index: syntax.pl
===================================================================
RCS file: /cvsroot/e-p-i-c/org.epic.perleditor-test/workspace/EPICTest/syntax.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- syntax.pl	24 Dec 2005 00:01:42 -0000	1.1
+++ syntax.pl	25 Dec 2005 14:08:26 -0000	1.2
@@ -6,7 +6,7 @@
 }
 
 # bug 1309321
-if ($_ !~ /(^#|^\s*$)/) { $hello = x; } 
+if ($_ !~ /(^#|^\s*$)/) { $hello = 1; } 
 
 # bug 1312851
 my $result1= $self->executeSQLSelect(query=>$SQL);