From 7e86f6c5e89a96bbaaa257be0a3864184cbcca93 Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Fri, 9 Feb 2024 14:33:15 +0200 Subject: Remove unused API adapter mock functions --- desmoctl.scm | 8 -------- 1 file changed, 8 deletions(-) diff --git a/desmoctl.scm b/desmoctl.scm index 924437a..fb37bd1 100644 --- a/desmoctl.scm +++ b/desmoctl.scm @@ -281,14 +281,6 @@ ;; API adapter ;; ;;;;;;;;;;;;;;;;; -(define (mock-post-fn . rest) - ;; (print (format "~%mock-post-fn called with: ~A" rest)) - rest) - -(define (mock-get-fn . rest) - ;; (print (format "~%mock-get-fn called with: ~A" rest)) - rest) - (define http-client (make-parameter with-input-from-request)) (define (post-prison cfg prison-json) -- cgit v1.3