oops, there's no debug() in stow

This commit is contained in:
adam 2005-12-22 10:30:55 +00:00 committed by Adam Spiers
parent 8c8fe752f1
commit 65196fb9a3

View file

@ -578,7 +578,7 @@ sub get_ignore_re_from_file {
}
close(REGEXPS);
my $re = join '|', @regexps;
debug("#% ignore regexp is $re\n");
warn "#% ignore regexp is $re\n" if $Verbose;
return qr/$re/;
}