oops, there's no debug() in stow

2005-12-22 10:30:55 +00:00 · 2005-12-22 10:30:55 +00:00 · 65196fb9a3
parent 8c8fe752f1
commit 65196fb9a3
1 changed files with 1 additions and 1 deletions
--- a/stow.in
+++ b/stow.in
@ -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/;
 }