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

Use https

Browse Source
This commit is contained in:
Jay McCarthy 2018-10-03 13:13:27 -04:00
parent 37294bd8f7
commit fc9e4f4646
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/packages.rkt
View File

@ -34,7 +34,7 @@
(define package-index-url (define package-index-url
(or (@ (config) package-index-url) (or (@ (config) package-index-url)
"http://pkgs.racket-lang.org/pkgs-all.json.gz")) "https://pkgs.racket-lang.org/pkgs-all.json.gz"))
(define package-fetch-interval (define package-fetch-interval
(* (or (@ (config) package-fetch-interval) (* (or (@ (config) package-fetch-interval)

12
src/site.rkt
View File

@ -52,7 +52,7 @@
(define nav-search "Search") (define nav-search "Search")
(define (navbar-header) (define (navbar-header)
`(a ((href "http://www.racket-lang.org/")) `(a ((href "https://www.racket-lang.org/"))
(img ((src ,(static-resource-url "/logo-and-text.png")) (img ((src ,(static-resource-url "/logo-and-text.png"))
(height "60") (height "60")
(alt "Racket Package Index"))))) (alt "Racket Package Index")))))
@ -72,7 +72,7 @@
(define pkg-build-baseurl (define pkg-build-baseurl
(or (@ (config) pkg-build-baseurl) (or (@ (config) pkg-build-baseurl)
"http://pkg-build.racket-lang.org/")) "https://pkg-build.racket-lang.org/"))
(struct draft-package (old-name name description authors tags versions) #:prefab) (struct draft-package (old-name name description authors tags versions) #:prefab)
@ -143,11 +143,11 @@
(,nav-search ,(named-url search-page)) (,nav-search ,(named-url search-page))
("About" ("About"
(("The Racket Package System" (("The Racket Package System"
"http://docs.racket-lang.org/pkg/getting-started.html") "https://docs.racket-lang.org/pkg/getting-started.html")
("Package Builds" "https://pkg-build.racket-lang.org/about.html"))) ("Package Builds" "https://pkg-build.racket-lang.org/about.html")))
((div ,(glyphicon 'download-alt) ((div ,(glyphicon 'download-alt)
" Download Racket") " Download Racket")
"http://download.racket-lang.org/") "https://download.racket-lang.org/")
)) ))
(bootstrap-static-urlprefix (bootstrap-static-urlprefix
(if (rendering-static-page?) (if (rendering-static-page?)
@ -730,9 +730,9 @@
`(div ((class "jumbotron")) `(div ((class "jumbotron"))
(h1 "Racket Packages") (h1 "Racket Packages")
(p "These are the packages in the official " (p "These are the packages in the official "
(a ((href "http://docs.racket-lang.org/pkg/getting-started.html")) (a ((href "https://docs.racket-lang.org/pkg/getting-started.html"))
"package catalog") ".") "package catalog") ".")
(p (a ((href "http://docs.racket-lang.org/pkg/cmdline.html")) (p (a ((href "https://docs.racket-lang.org/pkg/cmdline.html"))
(kbd "raco pkg install " (var "package-name"))) (kbd "raco pkg install " (var "package-name")))
" installs a package.") " installs a package.")
(p "You can " (p "You can "