Fixing error during initial upload in P2 PNS
This commit is contained in:
parent
ddd03347ea
commit
ec269fc1cf
|
@ -592,7 +592,8 @@
|
||||||
([class "package"])
|
([class "package"])
|
||||||
(form ([action ,(embed/url form-handler)] [method "post"])
|
(form ([action ,(embed/url form-handler)] [method "post"])
|
||||||
,the-table)
|
,the-table)
|
||||||
(div ([class "install"])
|
,(if pkg-name
|
||||||
|
`(div ([class "install"])
|
||||||
"Install this package with:" (br) (br)
|
"Install this package with:" (br) (br)
|
||||||
(tt "raco pkg install " ,pkg-name) (br) (br)
|
(tt "raco pkg install " ,pkg-name) (br) (br)
|
||||||
"or, by evaluating:" (br)
|
"or, by evaluating:" (br)
|
||||||
|
@ -601,7 +602,8 @@
|
||||||
"#lang racket"
|
"#lang racket"
|
||||||
"(require planet2)"
|
"(require planet2)"
|
||||||
(format "(install \"~a\")"
|
(format "(install \"~a\")"
|
||||||
pkg-name)))))))))
|
pkg-name))))
|
||||||
|
""))))))
|
||||||
|
|
||||||
(define (page/manage/update req)
|
(define (page/manage/update req)
|
||||||
(update-checksums
|
(update-checksums
|
||||||
|
|
Loading…
Reference in New Issue
Block a user