Follow symlinks

diff --git a/zk b/zk
index 2e8c33850001a5fa03d7729bd386b89dc9e8a8c4..e4006617a7e46485e0ef956efa152d686233d1ba 100755 (executable)
--- a/zk
+++ b/zk
@@ -144,7 +144,8 @@ my %cats;
             $mtimes{$pth} = strftime "%Y-%m-%d %H:%M:%S", gmtime $s[9];
         }
     }
-    find(\&wanted, ".");
+    my %opts = (wanted => \&wanted, follow => 1);
+    find(\%opts, ".");
 }
 
 my %links;