diff options
| author | Russ Allbery <eagle@eyrie.org> | 2014-07-11 18:24:09 -0700 |
|---|---|---|
| committer | Russ Allbery <rra@stanford.edu> | 2014-07-11 19:03:17 -0700 |
| commit | af82b76209e29c662470802b321a04e88780b64b (patch) | |
| tree | 27057ad410bf3c1ffe3a379907b6c17ddd6d5b92 | |
| parent | 90a32a39fc996999f0ee6938a6fe90950cb839f9 (diff) | |
Undo email address change for verifier test
The global replacement of my email address broke this test as
well since I was using my address as part of the test. Revert
to the previous email address, since it's just example data.
Change-Id: Iaebcf4b4556308d5a69fbe2c8b59b05304dfbf66
Reviewed-on: https://gerrit.stanford.edu/1523
Reviewed-by: Russ Allbery <rra@stanford.edu>
Tested-by: Russ Allbery <rra@stanford.edu>
| -rwxr-xr-x | perl/t/verifier.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl/t/verifier.t b/perl/t/verifier.t index c734762..5697ae6 100755 --- a/perl/t/verifier.t +++ b/perl/t/verifier.t @@ -3,7 +3,7 @@ # Tests for the basic wallet ACL verifiers. # # Written by Russ Allbery <eagle@eyrie.org> -# Copyright 2007, 2008, 2010 +# Copyright 2007, 2008, 2010, 2014 # The Board of Trustees of the Leland Stanford Junior University # # See LICENSE for licensing terms. @@ -43,9 +43,9 @@ is ($verifier->error, 'malformed krb5 ACL', ' and right error'); $verifier = Wallet::ACL::Krb5::Regex->new; isa_ok ($verifier, 'Wallet::ACL::Krb5::Regex', 'krb5-regex verifier'); -is ($verifier->check ('eagle@eyrie.org', '.*@stanford\.edu\z'), 1, +is ($verifier->check ('rra@stanford.edu', '.*@stanford\.edu\z'), 1, 'Simple check'); -is ($verifier->check ('eagle@eyrie.org', '^a.*@stanford\.edu'), 0, +is ($verifier->check ('rra@stanford.edu', '^a.*@stanford\.edu'), 0, 'Simple failure'); is ($verifier->error, undef, 'No error set'); is ($verifier->check (undef, '^rra@stanford\.edu\z'), undef, |