aboutsummaryrefslogtreecommitdiff
path: root/perl/t/report.t
diff options
context:
space:
mode:
authorRuss Allbery <rra@stanford.edu>2013-03-27 15:19:54 -0700
committerRuss Allbery <rra@stanford.edu>2013-03-27 15:19:54 -0700
commit5df16adc5024c56e3d733741919954308b4d498a (patch)
tree5f042adaaa988478ca271f41f9b272ef5a1b45b5 /perl/t/report.t
parent431c3b56a52b9fe3135ab4339bada13ed49bda92 (diff)
parent6871bae8e26beadaff5035de56b4f70a78961dc9 (diff)
Merge tag 'upstream/1.0' into debian
Upstream version 1.0
Diffstat (limited to 'perl/t/report.t')
-rwxr-xr-xperl/t/report.t5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl/t/report.t b/perl/t/report.t
index 363db20..a6b85df 100755
--- a/perl/t/report.t
+++ b/perl/t/report.t
@@ -3,7 +3,8 @@
# Tests for the wallet reporting interface.
#
# Written by Russ Allbery <rra@stanford.edu>
-# Copyright 2008, 2009, 2010 Board of Trustees, Leland Stanford Jr. University
+# Copyright 2008, 2009, 2010
+# The Board of Trustees of the Leland Stanford Junior University
#
# See LICENSE for licensing terms.
@@ -145,7 +146,7 @@ is (scalar (@lines), 1, 'Searching for objects owned by ADMIN finds one');
is ($lines[0][0], 'base', ' and it has the right type');
is ($lines[0][1], 'service/admin', ' and the right name');
@lines = $report->objects ('owner', 'null');
-is (scalar (@lines), 1, 'Searching for objects with no set ownerfinds one');
+is (scalar (@lines), 1, 'Searching for objects with no set owner finds one');
is ($lines[0][0], 'base', ' and it has the right type');
is ($lines[0][1], 'service/null', ' and the right name');
@lines = $report->objects ('acl', 'ADMIN');