iens

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

commit 00e0a2f0c770c4d29a339d95bc48e7e4eae0a4f8
parent 4ffc50b3b5612bb3fceec0cab3fdcea15c9ec3f6
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date:   Fri, 26 Jun 2026 19:31:03 +0000

Unused function auto-add* is removed
Diffstat:
Msrc/iens.scm | 11-----------
1 file changed, 0 insertions(+), 11 deletions(-)

diff --git a/src/iens.scm b/src/iens.scm @@ -569,17 +569,6 @@ (write-line (conc "Added " new-id))) (update-feed-cache ctime)) -(define (auto-add* spec lines) - (cond - ((string? spec) - (add-entry spec lines)) - ((and (list? spec) (= 3 (length spec))) - (add-entry (caddr spec) lines) - (set-source (car spec)) - (unless (string=? (cadr spec) "") - (set-title (cadr spec)))) - (else (assert #f "Unexpected spec " spec)))) - (defcmd (add-entry first second . rest) "[timestamp] URL note-line [note-line ...]" "Create a new entry" (if (or (null? rest) (string? first) (list? first))