summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-web/config.scm17
1 files changed, 1 insertions, 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)))