- use closedir to close directory, not just close (which is for filehandle)

2012-07-11 13:33:12 +00:00 · 2012-07-11 13:33:12 +00:00 · a0b680e8c7
commit a0b680e8c7
parent b9a20c3995
1 changed files with 1 additions and 1 deletions
--- a/lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/File.pm
+++ b/lemonldap-ng-common/lib/Lemonldap/NG/Common/Conf/File.pm
@ -25,7 +25,7 @@ sub available {
    my $self = shift;
    opendir D, $self->{dirName};
    my @conf = readdir(D);
-    close D;
+    closedir D;
    @conf = sort { $a <=> $b } map { /lmConf-(\d+)/ ? $1 : () } @conf;
    return @conf;
 }