|
|
|
@ -802,7 +802,7 @@ In this project, we want to end up with HTML, so our source files will be called
|
|
|
|
<title>◊select['h1 doc] by T. S. Eliot</title>
|
|
|
|
<title>◊select['h1 doc] by T. S. Eliot</title>
|
|
|
|
<link rel="stylesheet" type="text/css" media="all" href="styles.css" />
|
|
|
|
<link rel="stylesheet" type="text/css" media="all" href="styles.css" />
|
|
|
|
</head>
|
|
|
|
</head>
|
|
|
|
<body>◊->html[doc]
|
|
|
|
<body>◊(->html doc #:splice #t)
|
|
|
|
◊(define prev-page (previous here))
|
|
|
|
◊(define prev-page (previous here))
|
|
|
|
◊when/block[prev-page]{
|
|
|
|
◊when/block[prev-page]{
|
|
|
|
<div id="prev">← <a href="◊|prev-page|">◊(select 'h1 prev-page)</a></div>}
|
|
|
|
<div id="prev">← <a href="◊|prev-page|">◊(select 'h1 prev-page)</a></div>}
|
|
|
|
|
