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

pkgn to pkgs

Browse Source
This commit is contained in:
Jay McCarthy 2017-04-08 17:16:49 -04:00
parent 2fe41a1f3c
commit 2c29aa05c9
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
configs/live.rkt
View File

@ -21,10 +21,10 @@
;; ;;
'static-output-type 'aws-s3 'static-output-type 'aws-s3
'aws-s3-bucket+path "pkgn.racket-lang.org/" 'aws-s3-bucket+path "pkgs.racket-lang.org/"
'static-urlprefix "https://pkgn.racket-lang.org" 'static-urlprefix "https://pkgs.racket-lang.org"
'dynamic-urlprefix "https://pkgd.racket-lang.org/pkgn" 'dynamic-urlprefix "https://pkgd.racket-lang.org/pkgn"
'dynamic-static-urlprefix "https://pkgn.racket-lang.org" 'dynamic-static-urlprefix "https://pkgs.racket-lang.org"
;; 'static-output-type 'aws-s3 ;; 'static-output-type 'aws-s3
;; 'aws-s3-bucket+path "pkgs.leastfixedpoint.com/" ;; 'aws-s3-bucket+path "pkgs.leastfixedpoint.com/"

1
src/static.rkt
View File

@ -250,6 +250,7 @@
'()))) '())))
(define (static-renderer-aws-s3 index) (define (static-renderer-aws-s3 index)
(s3-region "us-west-2")
(when (not index) (configure-s3-cors!)) (when (not index) (configure-s3-cors!))
(let ((index (or index (initial-aws-s3-index)))) (let ((index (or index (initial-aws-s3-index))))
(match (match