From 78735a06523c8f53ae384110946c045f2347bff9 Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Fri, 9 Feb 2024 14:31:54 +0200 Subject: Fix bug with new API interface --- desmoctl.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/desmoctl.scm b/desmoctl.scm index e2fd36f..924437a 100644 --- a/desmoctl.scm +++ b/desmoctl.scm @@ -443,7 +443,7 @@ (debug-print "apply json:" apply-json) (define api-response - (post-prison post-fn cfg apply-json)) + (post-prison cfg apply-json)) (debug-print "api-response:" api-response)) @@ -459,7 +459,7 @@ (print "Fetching status of all prisons...") (define api-response - (get-prisons get-fn cfg)) + (get-prisons cfg)) (define prisons (vector->list (from-json-string api-response))) -- cgit v1.3