From d786dd0704a12ce74ced011737bc3852aae2ae60 Mon Sep 17 00:00:00 2001 From: crc Date: Sat, 24 Mar 2018 13:54:43 +0000 Subject: [PATCH] Atua-WWW: Now HTML 4.01 Strict compliant FossilOrigin-Name: b5c10a70f34222702a6f9b11a55195833ffe74b03379102f3ec505374ab55f95 --- example/Atua-WWW.forth | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/example/Atua-WWW.forth b/example/Atua-WWW.forth index f2b51a6..ec2479b 100755 --- a/example/Atua-WWW.forth +++ b/example/Atua-WWW.forth @@ -304,11 +304,12 @@ The `gopher:icon` displays an indicator for menu items. :gopher:generate-index (f-) 'Content-type:_text/html puts eol eol - ' puts eol + ' puts eol ' puts 'tt_{_white-space:_pre;_} puts '_*_{_color:_#bbb;_background:_#090909;_font-size:_large;_}_a_{_color:_#FF6600;_} puts - 'forthworks.com puts eol eol + 'forthworks.com

puts eol eol file:R file:open !FID @FID file:size !Size [ buffer gopher:gets @@ -317,7 +318,7 @@ The `gopher:icon` displays an indicator for menu items. @FID file:close [ #70 [ $_ putc ] times ] html:tt html:br eol 'forthworks.com:80_/_atua-www_/_running_on_retro gopher:i - ' puts + '

puts ; ````