From 44958855f3199f12a680a5d670a85d30a6582482 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 11 Dec 2007 09:35:35 +0000 Subject: get rid of a "Use of uninitialized value" --- t/superuser--rpm.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/superuser--rpm.t b/t/superuser--rpm.t index eb21355d..9405e87b 100644 --- a/t/superuser--rpm.t +++ b/t/superuser--rpm.t @@ -21,6 +21,6 @@ sub test_rpm_query_in_scriptlet { sub rebuilddb { # testing rebuilddb (could be done elsewhere, but here is system_("rpm --root $::pwd/root --rebuilddb"); - my ($dir) = glob("$::pwd/root/var/lib/rpmrebuilddb*"); - is($dir, undef, "$dir should not be there"); + my @dirs = glob("$::pwd/root/var/lib/rpmrebuilddb*"); + is($dirs[0], undef, "@dirs should not be there"); } -- cgit v1.2.1