iens

Manager of links to read
git clone https://git.instinctive.eu/iens.git
Log | Files | Refs | README | LICENSE

commit 3f28ebbc6f1db201c5db171f3a3b3e34763a00c0
parent 91228b7486726de4e9f4df938bdce642a6fecc67
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date:   Fri, 24 Apr 2026 19:01:06 +0000

Duplicate posts are displayed in main view
Diffstat:
Msrc/cgi.scm | 4++--
1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/cgi.scm b/src/cgi.scm @@ -557,7 +557,7 @@ END-OF-CSS (let* ((last-id (string->number (required-input-var "last-id"))) (frags (query (map-rows* post-fragment) - (sql db "SELECT id,mark,ptime,section,title,url FROM gruik WHERE id > ? AND mark >= 0;") + (sql db "SELECT id,mark,ptime,section,title,url FROM gruik WHERE id > ? AND mark >= -5;") last-id)) (btn (if (null? frags) "Recheck" "More"))) (htmx-output @@ -598,7 +598,7 @@ END-OF-CSS (catch-up) (gruik-list-view "Latest gruiks" - "SELECT id,mark,ptime,section,title,url FROM gruik WHERE mark >= 0;")) + "SELECT id,mark,ptime,section,title,url FROM gruik WHERE mark >= -5;")) (define (db-push-gruik str-id) (let ((id (string->number str-id)))