summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mumi/web/controller.scm4
-rw-r--r--mumi/web/view/html.scm4
2 files changed, 1 insertions, 7 deletions
diff --git a/mumi/web/controller.scm b/mumi/web/controller.scm
index e854823..627466b 100644
--- a/mumi/web/controller.scm
+++ b/mumi/web/controller.scm
@@ -98,10 +98,6 @@
(map string->number path)))
(('GET "issue" not-an-id)
(apply render-html (unknown not-an-id)))
- (('GET "snippet" "recent")
- (apply render-html (list #:sxml (list-of-bugs (recent-bugs 10)))))
- (('GET "snippet" "priority")
- (apply render-html (list #:sxml (priority-bugs))))
(('GET "help")
(apply render-html (help)))
(('GET path ...)
diff --git a/mumi/web/view/html.scm b/mumi/web/view/html.scm
index a0567f7..ec39dd7 100644
--- a/mumi/web/view/html.scm
+++ b/mumi/web/view/html.scm
@@ -30,9 +30,7 @@
unknown
error-page
issue-page
- list-of-matching-bugs
- list-of-bugs
- priority-bugs))
+ list-of-matching-bugs))
(define (bug-subject* bug)
(or (bug-subject bug) "(no subject)"))