diff --git a/lib/Stow.pm.in b/lib/Stow.pm.in index 416c956..cf81d9b 100755 --- a/lib/Stow.pm.in +++ b/lib/Stow.pm.in @@ -1963,8 +1963,12 @@ sub do_rmdir { #============================================================================ sub internal_error { my ($format, @args) = @_; - die "$ProgramName: INTERNAL ERROR: " . sprintf($format, @args) . "\n", - "This _is_ a bug. Please submit a bug report so we can fix it:-)\n"; + my $error = sprintf($format, @args); + die <