From 4477c6ee29dcb28c7cba17c81ae420896c31093f Mon Sep 17 00:00:00 2001
From: Munyoki Kilyungi
Date: Thu, 15 Feb 2024 14:52:54 +0300
Subject: Filter out files that only have "None".

Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
---
 examples/dataset-metadata-git.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'examples')

diff --git a/examples/dataset-metadata-git.scm b/examples/dataset-metadata-git.scm
index 023e4c6..aeced0a 100755
--- a/examples/dataset-metadata-git.scm
+++ b/examples/dataset-metadata-git.scm
@@ -20,7 +20,9 @@
 (define (infopages/sql->rtf result)
   (let* ((get (cut assoc-ref result <>))
          (get* (compose (lambda (str)
-                          (if (string-blank? str)
+                          (if (or (string-blank? str)
+                                  (string-ci=?
+                                   (string-trim-both str) "None"))
                               #f
                               str))
                         get))
-- 
cgit v1.2.3