bugfixes++

1 files changed, 1 insertions, 1 deletions

diff --git a/sboclean b/sboclean
index 3154bd1..fd6f5c8 100755
--- a/sboclean
+++ b/sboclean
@@ -49,7 +49,7 @@ unless ($clean_dist || $clean_work) {
 
 sub remove_stuff ($) {
 	exists $_[0] or script_error 'remove_stuff requires an argument';
-	say "Nothing to do." and return 1 unless -d $_[0];
+	-d $[0] or say "Nothing to do." and return 1;
 	my $dir = shift;
 	opendir (my $dh, $dir);
 	FIRST: while (my $ls = readdir $dh) {