diff options
| author | Russ Allbery <rra@stanford.edu> | 2012-08-30 14:09:26 -0700 |
|---|---|---|
| committer | Russ Allbery <rra@stanford.edu> | 2012-08-30 14:09:26 -0700 |
| commit | 47680970fb76105a45ca889a3e98a9664af5eb7a (patch) | |
| tree | c8b1e1bfa9c4910a0e15db3ff72eefa5b61a8fb7 /perl | |
| parent | 1ef5fb36c40daf0439a1c786796fa6e4628bc212 (diff) | |
Attempt kinit --no-afslog first in Perl test suite
Avoid tromping on the user's AFS credentials if using Heimdal
user space.
Diffstat (limited to 'perl')
| -rw-r--r-- | perl/t/lib/Util.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl/t/lib/Util.pm b/perl/t/lib/Util.pm index 44a4d21..8bbefc4 100644 --- a/perl/t/lib/Util.pm +++ b/perl/t/lib/Util.pm @@ -74,6 +74,7 @@ sub db_setup { sub getcreds { my ($file, $principal) = @_; my @commands = ( + "kinit --no-afslog -k -t $file $principal >/dev/null 2>&1 </dev/null", "kinit -k -t $file $principal >/dev/null 2>&1 </dev/null", "kinit -t $file $principal >/dev/null 2>&1 </dev/null", "kinit -T /bin/true -k -K $file $principal >/dev/null 2>&1 </dev/null", |