commit 5cb863c91adb77f2601d505bd0f4fb86fda88ec9
parent 33106cff20d283353204a9447945f56acdfe5723
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date: Wed, 13 Mar 2024 22:13:33 +0000
Touch command without arguments is corrected
Diffstat:
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/iens.scm b/src/iens.scm
@@ -878,7 +878,7 @@
(define (touch . args)
(cond ((null? args)
- (touch* (current-seconds) entry-id))
+ (touch* (current-seconds) cur-entry))
((not (integer? (car args)))
(assert #f "Bad type for " (car args)))
((null? (cdr args))