summaryrefslogtreecommitdiffstats
path: root/lib/MDV/Distribconf
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2007-11-09 14:29:39 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2007-11-09 14:29:39 +0000
commit0e5a408a9e004e3bf48d909c93b0b2693c45d961 (patch)
treeb9f58d99fce5003b4a8158298de83d07f08537e7 /lib/MDV/Distribconf
parent123f0f08b6a1060ac5422a6acca434e505007398 (diff)
downloadperl-MDV-Distribconf-0e5a408a9e004e3bf48d909c93b0b2693c45d961.tar
perl-MDV-Distribconf-0e5a408a9e004e3bf48d909c93b0b2693c45d961.tar.gz
perl-MDV-Distribconf-0e5a408a9e004e3bf48d909c93b0b2693c45d961.tar.bz2
perl-MDV-Distribconf-0e5a408a9e004e3bf48d909c93b0b2693c45d961.tar.xz
perl-MDV-Distribconf-0e5a408a9e004e3bf48d909c93b0b2693c45d961.zip
- use open with 3 args instead 2
Diffstat (limited to 'lib/MDV/Distribconf')
-rw-r--r--lib/MDV/Distribconf/Utils.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MDV/Distribconf/Utils.pm b/lib/MDV/Distribconf/Utils.pm
index 9bed51c..818eb77 100644
--- a/lib/MDV/Distribconf/Utils.pm
+++ b/lib/MDV/Distribconf/Utils.pm
@@ -80,7 +80,7 @@ sub checkmd5 {
$foundmd5{$basename} = '';
}
}
- open(my $hmd5, "< $md5file") or return([ keys %foundmd5 ], \%foundmd5);
+ open(my $hmd5, "<", $md5file) or return([ keys %foundmd5 ], \%foundmd5);
my %md5;
while (<$hmd5>) {
chomp;