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

Direct people to temporary snapshot pages.

Browse Source
This commit is contained in:
Eli Barzilay 2013-08-31 13:20:08 -04:00
parent 2184be2234
commit bf2ebebff6
1 changed files with 20 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
pkgs/plt-services/meta/web/stubs/pre.rkt
View File

@ -4,6 +4,19 @@
(define-context "stubs/pre") (define-context "stubs/pre")
(define temporary-outdated-warning
@div[style: "border: 1px dotted red; padding: 0ex 1ex"]{
@p*{
This page is not currently updating with new nightly builds, but it will
resume soon.
@~
Meanwhile, recent builds for various platforms are available from the
following sites:
@ul*{@~ @a[href: "http://www.cs.utah.edu/plt/snapshots/"]{
University of Utah}
@~ @a[href: "http://plt.eecs.northwestern.edu/snapshots/"]{
Northwestern University}}}})
(define (hole tag) (define (hole tag)
@list{@|| @list{@||
{{{@tag}}} {{{@tag}}}
@ -18,6 +31,7 @@
(define template (define template
;; generic skeleton for all files that don't have a specific template below. ;; generic skeleton for all files that don't have a specific template below.
@page[#:window-title title-hole]{ @page[#:window-title title-hole]{
@temporary-outdated-warning
@content-hole @content-hole
@hr @hr
@version-hole}) @version-hole})
@ -25,6 +39,7 @@
(provide index) (provide index)
(define index (define index
@page[#:file "" #:window-title "Prebuilt materials"]{ @page[#:file "" #:window-title "Prebuilt materials"]{
@temporary-outdated-warning
@p{This directory contains Racket materials that are built daily from the @p{This directory contains Racket materials that are built daily from the
development repository. See below for instructions.} development repository. See below for instructions.}
@hr @hr
@ -64,6 +79,7 @@
(define pre-installers (define pre-installers
@page[#:file "pre-installers/" #:title "Nightly build pre-installers"]{ @page[#:file "pre-installers/" #:title "Nightly build pre-installers"]{
@temporary-outdated-warning
@p{This directory contains distribution packages in tgz format. They are @p{This directory contains distribution packages in tgz format. They are
later converted to the actual platform-specific later converted to the actual platform-specific
@a[href: "../installers/"]{installers}.} @a[href: "../installers/"]{installers}.}
@ -75,6 +91,7 @@
(provide installers) (provide installers)
(define installers (define installers
@page[#:file "installers/" #:title "Nightly build installers"]{ @page[#:file "installers/" #:title "Nightly build installers"]{
@temporary-outdated-warning
@p{Pre-release software is built using actively developed sources. @p{Pre-release software is built using actively developed sources.
Binaries are built nightly, and minute-by-minute changes are available Binaries are built nightly, and minute-by-minute changes are available
through @|git|.} through @|git|.}
@ -118,6 +135,7 @@
(apply docs text))) (apply docs text)))
(define docs (define docs
@page[#:file "docs/" #:title "Prebuilt documentation"]{ @page[#:file "docs/" #:title "Prebuilt documentation"]{
@temporary-outdated-warning
@p{This directory contains documentation files in all forms, compiled from @p{This directory contains documentation files in all forms, compiled from
the current sources.} the current sources.}
@hr @hr
@ -127,6 +145,7 @@
(define binaries (define binaries
@page[#:file "binaries/" #:title "Prebuilt binaries"]{ @page[#:file "binaries/" #:title "Prebuilt binaries"]{
@temporary-outdated-warning
@p{This directory contains a subdirectory for each supported platform.} @p{This directory contains a subdirectory for each supported platform.}
@hr @hr
@content-hole @content-hole
@ -135,6 +154,7 @@
(define script (define script
@page[#:file "script.html" #:title "Using the nightly Racket builds"]{ @page[#:file "script.html" #:title "Using the nightly Racket builds"]{
@temporary-outdated-warning
@(define (url . s) @list{http://pre.racket-lang.org/@s}) @(define (url . s) @list{http://pre.racket-lang.org/@s})
@(define (pre* . text) (apply pre style: "margin-left: 2em;" text)) @(define (pre* . text) (apply pre style: "margin-left: 2em;" text))
@p*{ @p*{