Filter out empty hash for "-"

l3kn · Mar 18, 2024 · 8ed2d3d · 8ed2d3d
1 parent c78aa99
commit 8ed2d3d
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/org-fc-cache.el b/org-fc-cache.el
@@ -158,7 +158,8 @@ date / suspension state before review."
         (table (make-hash-table :test #'equal)))
     (dolist (line (split-string output "\n" t))
       (let ((parts (split-string line "  ")))
-        (puthash (cadr parts) (car parts) table)))
+	(unless (string= (cadr parts) "-")
+          (puthash (cadr parts) (car parts) table))))
     table))
 
 ;;; Footer