suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Point at the query page (symlink) instead of the stub page.

Browse Source
This commit is contained in:
Eli Barzilay 2010-06-29 00:40:42 -04:00
parent c14a945343
commit 9d97a201a4
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/meta/web/minis/bugs.rkt
View File

@ -52,9 +52,7 @@
(provide captcha-file) (provide captcha-file)
(define captcha-file (make-parameter #f)) (define captcha-file (make-parameter #f))
(define query (define query (cgi-link "gnatsweb" "query"))
@page[#:title "Query Bug Reports" #:file "query/"]{
@em{TODO}})
(define (bugs-script) (define (bugs-script)
@script/inline{ @script/inline{
@ -183,7 +181,7 @@
@ul{@li{Consult the @-docs,} @ul{@li{Consult the @-docs,}
@li{@download a newer Racket version if there is one (Racket @li{@download a newer Racket version if there is one (Racket
displays its version number on startup),} displays its version number on startup),}
@li{@query{Query existing bug reports}.}}} @li{@a[href: (list query "/")]{Query existing bug reports}.}}}
@(define (field mode title . input) @(define (field mode title . input)
(let ([title (b title ":")]) (let ([title (b title ":")])
(case mode (case mode