diff options
Diffstat (limited to 'sboclean')
-rwxr-xr-x | sboclean | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -59,7 +59,7 @@ sub rm_full { my $full = shift; if ($interactive) { print "Remove $full? [n] "; - return unless <STDIN> =~ /^[Yy]/; + return() unless <STDIN> =~ /^[Yy]/; } unlink $full if -f $full; remove_tree($full) if -d $full; |