From: Dobrica Pavlinusic Date: Sun, 25 Nov 2007 23:26:09 +0000 (+0000) Subject: r277@brr: dpavlin | 2007-11-25 22:40:56 +0100 X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=commitdiff_plain;h=d916499e9a4cc6319d40186f41d70fda24898f84 r277@brr: dpavlin | 2007-11-25 22:40:56 +0100 hush debug git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@232 836a5e1a-633d-0410-964b-294494ad4392 --- diff --git a/lib/CWMP/Store/HASH.pm b/lib/CWMP/Store/HASH.pm index fed4495..bcc503d 100644 --- a/lib/CWMP/Store/HASH.pm +++ b/lib/CWMP/Store/HASH.pm @@ -108,7 +108,7 @@ sub all_uids { my $self = shift; my $ext = $self->extension; - warn "## extension: $ext"; + #warn "## extension: $ext"; opendir(my $d, $path) || die "can't opendir $path: $!"; my @uids = grep { $_ =~ m/\Q$ext\E$/ && -f "$path/$_" } readdir($d);