From 4fe90bf6c7a99cf4470f15e626d6ae036f0d1a6a Mon Sep 17 00:00:00 2001
From: Sergey Matveev <stargrave@stargrave.org>
Date: Thu, 8 May 2025 19:25:46 +0300
Subject: [PATCH] Do not ignore root directory

---
 zk | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/zk b/zk
index 04b0829..5179aa3 100755
--- a/zk
+++ b/zk
@@ -160,7 +160,7 @@ my %cats;
     use POSIX qw(strftime);
     sub wanted {
         my $fn = $_;
-        return if $fn =~ /^\./;
+        return if ($fn =~ /^\./) and ($fn ne ".");
         my $pth = $File::Find::name;
         $pth =~ s/^\.\/?//;
         if (-d $fn) {
-- 
2.48.1