iens

Manager of links to read
git clone https://git.instinctive.eu/iens.git
Log | Files | Refs | README | LICENSE
commit 8d1c83fac0638e9116fb91937044b198e700390c
parent 3aaecb68a5902702a23d20e4f5eb42233364702e
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date:   Tue, 11 Aug 2026 17:15:53 +0000

get-gruiks loop is corrected
Diffstat:

Msrc/get-gruiks.scm | 8++++----


1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/get-gruiks.scm b/src/get-gruiks.scm
@@ -213,10 +213,10 @@
         (query fetch-value (sql db "SELECT count(*) FROM source_rss;")))))
 
 (if total-period
-    (let loop loop ((index (query fetch-value
-                                  (sql/transient db
-                                    "SELECT min(id) FROM source_rss;")))
-                    (deadline (add-period 0)))
+    (let loop ((index (query fetch-value
+                             (sql/transient db
+                               "SELECT min(id) FROM source_rss;")))
+               (deadline (add-period 0)))
       (let ((arg (query fetch-row
                         (sql db "SELECT
                                    COALESCE((SELECT min(id) FROM source_rss