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:
| M | src/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))