From eb3b657cd8620ecd34dd3c224a4263d90381789b Mon Sep 17 00:00:00 2001
From: Russ Allbery <rra@stanford.edu>
Date: Sat, 1 Dec 2007 01:10:48 +0000
Subject: Hide kinit errors.  No one cares.

---
 perl/t/keytab.t   | 6 +++---
 perl/t/verifier.t | 6 +++---
 2 files changed, 6 insertions(+), 6 deletions(-)

(limited to 'perl')

diff --git a/perl/t/keytab.t b/perl/t/keytab.t
index c7b333c..fbd66f6 100755
--- a/perl/t/keytab.t
+++ b/perl/t/keytab.t
@@ -79,9 +79,9 @@ sub destroy {
 sub getcreds {
     my ($file, $principal) = @_;
     my @commands = (
-        "kinit -k -t $file $principal >/dev/null </dev/null",
-        "kinit -t $file $principal >/dev/null </dev/null",
-        "kinit -k -K $file $principal >/dev/null </dev/null",
+        "kinit -k -t $file $principal 2>&1 >/dev/null </dev/null",
+        "kinit -t $file $principal 2>&1 >/dev/null </dev/null",
+        "kinit -k -K $file $principal 2>&1 >/dev/null </dev/null",
     );
     for my $command (@commands) {
         if (system ($command) == 0) {
diff --git a/perl/t/verifier.t b/perl/t/verifier.t
index 8027869..878c310 100755
--- a/perl/t/verifier.t
+++ b/perl/t/verifier.t
@@ -22,9 +22,9 @@ use Util;
 sub getcreds {
     my ($file, $principal) = @_;
     my @commands = (
-        "kinit -k -t $file $principal >/dev/null </dev/null",
-        "kinit -t $file $principal >/dev/null </dev/null",
-        "kinit -k -K $file $principal >/dev/null </dev/null",
+        "kinit -k -t $file $principal 2>&1 >/dev/null </dev/null",
+        "kinit -t $file $principal 2>&1 >/dev/null </dev/null",
+        "kinit -k -K $file $principal 2>&1 >/dev/null </dev/null",
     );
     for my $command (@commands) {
         if (system ($command) == 0) {
-- 
cgit v1.2.3