From 2279f1e0136b48fb9b3cbc685af8d5d14d559e16 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sat, 12 Oct 2019 18:40:18 +0100 Subject: Remove the now redundant with-base-and-target-commits function Uses of this have been replaced with parse-query-parameters. --- guix-data-service/web/controller.scm | 9 --------- 1 file changed, 9 deletions(-) diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm index b958395..b418b6b 100644 --- a/guix-data-service/web/controller.scm +++ b/guix-data-service/web/controller.scm @@ -88,15 +88,6 @@ value))) alist)) -(define (with-base-and-target-commits query-parameters conn f) - (let* ((base-commit (assoc-ref query-parameters "base_commit")) - (target-commit (assoc-ref query-parameters "target_commit"))) - - (f base-commit - (commit->revision-id conn base-commit) - target-commit - (commit->revision-id conn target-commit)))) - (define* (render-view-revision mime-types conn commit-hash -- cgit v1.2.3