diff --git a/fish/fish.pl b/fish/fish.pl
index 678d6cc73fdbd1bdc95741486b6eddd1f93db9cc..0207cf4d80f5d6d6e4b77115e679ecb0cffb997c 100755
--- a/fish/fish.pl
+++ b/fish/fish.pl
@@ -223,6 +223,7 @@ sub list {
     my $cwd = getcwd();
     chdir($dn) || do { print "### 500 $!\n"; return; };
     foreach (@entries) {
+        $_ = '.' if (!length($_));
         my $link = readlink;
         my ($mode,$uid,$gid,$size,$mtime) = (lstat)[2,4,5,7,9];
         print filetype($mode,$link,$uid,$gid);