1
0
mirror of https://github.com/urlysses/1991.git synced 2024-11-26 03:28:06 +11:00

Landing page demos should work, imho.

Just my 2 cents.
This commit is contained in:
urlysses 2017-03-01 14:04:40 -05:00
parent 0a6c0ec384
commit 0060efb69c

View File

@ -136,15 +136,17 @@ sourcedir s" views/" s+ set-view-path
s" Dynamic page title" ;
: ten-lines ( -- )
10 0 do
s" line " <# #s #> s+
s" line " i s>d <# #s #> s+
s" &lt;br>" s+
$type
loop ;
\ Use render-view to output the contents
\ of a file in the views/ directory.
: handle-/index
s" index.html" render-view ;
: handle-/
s" v-index.html" render-view ;
/1991 / handle-/
\ Start the server on port 8080.
8080 1991: