diff options
Diffstat (limited to 'tests')
| -rwxr-xr-x | tests/data/fake-kadmin | 4 | 
1 files changed, 2 insertions, 2 deletions
| diff --git a/tests/data/fake-kadmin b/tests/data/fake-kadmin index 039d8b2..81dc999 100755 --- a/tests/data/fake-kadmin +++ b/tests/data/fake-kadmin @@ -11,14 +11,14 @@ unless ($ARGV[0] eq '-q' && @ARGV == 2) {      die "invalid arguments\n";  }  my @command = split (' ', $ARGV[1]); -unless ("@command[0..3]" eq 'ktadd -q -norandkey -k') { +unless ("@command[0,1,3,4]" eq 'ktadd -k -q -norandkey') {      die "invalid command @command\n";  }  if ($command[5] eq 'error@EXAMPLE.ORG') {      warn "Some bad stuff\n";      exit 1;  } -open (OUT, '>', $command[4]) or die "cannot create $command[4]: $!\n"; +open (OUT, '>', $command[2]) or die "cannot create $command[2]: $!\n";  print OUT $command[5], "\n";  close OUT;  exit 0; | 
