From 5c46082912bac5e5993792183ce6446a06cb8011 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sat, 9 Aug 2014 09:53:17 -0400 Subject: Remove unused variable guix-web-router. * guix-web/config.scm (guix-web-router): Delete it. --- guix-web/config.scm | 17 +---------------- 1 file changed, 1 insertion(+), 16 deletions(-) diff --git a/guix-web/config.scm b/guix-web/config.scm index 0ca28cd..4c2220d 100644 --- a/guix-web/config.scm +++ b/guix-web/config.scm @@ -18,21 +18,6 @@ (define-module (guix-web config) #:use-module (ice-9 match) #:use-module (guix-web server) - #:export (guix-web-asset-dir - guix-web-router)) + #:export (guix-web-asset-dir)) (define guix-web-asset-dir (getcwd)) - -(define (guix-web-router path) - (match path - ((GET) - (redirect '("packages"))) - ((GET "packages") - (render-html (all-packages))) - ((GET "packages.json") - (render-json (all-packages-json))) - ((GET "package" name) - (render-html (view-package name))) - ((GET "librejs") - (render-html (librejs))) - (_ #f))) -- cgit v1.2.3