iens

commit 99f98a1fab6bff7a6f36421b04faa84a1d75d21e
parent 44fb66ffefb77c2ec5f3c1a5d18dba89ce25a594
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date:   Mon, 24 Aug 2026 18:31:51 +0000

Title is updated instead of duplicating in CGI
Diffstat:
M
src/cgi.scm
 | 
15
+++++++++++----

1 file changed, 11 insertions(+), 4 deletions(-)
diff --git a/src/cgi.scm b/src/cgi.scm
@@ -324,10 +324,17 @@ END-OF-CSS
              (section (list-ref parsed 2))
              (title   (list-ref parsed 3))
              (url     (list-ref parsed 4))
-             (_ (= 0 (query fetch-value
-                            (sql db "SELECT COUNT(id) FROM gruik
-                                     WHERE section=? AND url=? AND title=?;")
-                            section url title)
+             (_ (= 0 (exec (sql db
+                             "UPDATE gruik
+                              SET mtime=CAST(strftime('%s', 'now') as INT),
+                                  notes=(CASE WHEN title=?3
+                                         THEN notes
+                                         ELSE trim(notes||char(10)
+                                                   ||'Also “'||?3||'”',
+                                                   char(10))
+                                         END)
+                              WHERE section=?1 AND url=?2;")
+                           section url title)
                      (query fetch-value
                             (sql db "SELECT COUNT(id) FROM entry
                                      WHERE source=? AND url=? AND title=?;")