diff --git a/swim b/swim
index 9c1a722..673c97f 100755
--- a/swim
+++ b/swim
@@ -818,7 +818,7 @@ sub command {
 	   print STDERR "readable" if !-r $tmp;
 	   print STDERR "/" if !-r $tmp && !-w $tmp;
 	   print STDERR "writable" if !-w $tmp;
-	   print STDERR "/" if !-w $tmp || !-r $tmp;
+	   print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
 	   print STDERR "executable" if !-x $tmp;
 	   print STDERR " by your effective uid/gid\n";
 
@@ -826,7 +826,7 @@ sub command {
 	   print STDERR "readable" if !-r $tmp;
 	   print STDERR "/" if !-r $tmp && !-w $tmp;
 	   print STDERR "writable" if !-w $tmp;
-	   print STDERR "/" if !-w $tmp || !-r $tmp;
+	   print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
 	   print STDERR "executable" if !-x $tmp;
 	   print STDERR " by your effective uid/gid " . 
 	       "in $ENV{HOME}/.swim/swimrc\n";
@@ -868,7 +868,7 @@ sub command {
 			print STDERR "readable" if !-r $tmp;
 			print STDERR "/" if !-r $tmp && !-w $tmp;
 			print STDERR "writable" if !-w $tmp;
-			print STDERR "/" if !-w $tmp || !-r $tmp;
+			print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
 			print STDERR "executable" if !-x $tmp;
 			print STDERR " by your effective uid/gid\n";
 
@@ -876,7 +876,7 @@ sub command {
 			print STDERR "readable" if !-r $tmp;
 			print STDERR "/" if !-r $tmp && !-w $tmp;
 			print STDERR "writable" if !-w $tmp;
-			print STDERR "/" if !-w $tmp || !-r $tmp;
+			print STDERR "/" if (!-w $tmp || !-r $tmp) && !-x $tmp;
 			print STDERR "executable" if !-x $tmp;
 			print STDERR " by your effective uid/gid " . 
 			    "in $ENV{HOME}/.swim/swimrc\n";