[openca-cvsdev] CVS: openca-0.9/test/shell config.pl,1.3,1.4 test.pl,1.3,1.4

[<ope...@li...>]

Update of /cvsroot/openca/openca-0.9/test/shell
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7605/openca-0.9/test/shell

Modified Files:
	config.pl test.pl 
Log Message:
small update to be more bourne shell compliant


Author of changes:  michaelbell

Index: config.pl
===================================================================
RCS file: /cvsroot/openca/openca-0.9/test/shell/config.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** config.pl	23 Mar 2005 12:25:38 -0000	1.3
--- config.pl	23 Mar 2005 14:21:47 -0000	1.4
***************
*** 2,6 ****
  use strict;
  
! $ENV{CVSDIR}        = "/home/michael/OpenCA/cvs/head";
  $ENV{SRCDIR}        = "/tmp/openca-test-build";
  $ENV{OPENCA_PREFIX} = "/tmp/openca-test-prefix";
--- 2,6 ----
  use strict;
  
! $ENV{CVSDIR}        = "/home/michael/OpenCA/cvs/head" if (not $ENV{CVSDIR});
  $ENV{SRCDIR}        = "/tmp/openca-test-build";
  $ENV{OPENCA_PREFIX} = "/tmp/openca-test-prefix";

Index: test.pl
===================================================================
RCS file: /cvsroot/openca/openca-0.9/test/shell/test.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** test.pl	23 Mar 2005 12:25:38 -0000	1.3
--- test.pl	23 Mar 2005 14:21:47 -0000	1.4
***************
*** 5,14 ****
  
  my @majorlist = @ARGV;
- if (not @majorlist)
- {
-     opendir DIR, "." or die "Cannot open test directory.\n";
-     @majorlist = grep /[0-9]+/, readdir DIR;
-     closedir DIR;
- }
  
  my $persistent = 0;
--- 5,8 ----
***************
*** 18,21 ****
--- 12,24 ----
      $persistent = 1;
      print STDERR "Persistent logging activated.\n";
+     @majorlist = grep !/-pp/, @majorlist;
+     @majorlist = grep !/--persistent-protocol/, @majorlist;
+ }
+ 
+ if (not @majorlist)
+ {
+     opendir DIR, "." or die "Cannot open test directory.\n";
+     @majorlist = grep /[0-9]+/, readdir DIR;
+     closedir DIR;
  }