Atua-WWW: Now HTML 4.01 Strict compliant
FossilOrigin-Name: b5c10a70f34222702a6f9b11a55195833ffe74b03379102f3ec505374ab55f95
This commit is contained in:
parent
12ec404b61
commit
d786dd0704
1 changed files with 4 additions and 3 deletions
|
@ -304,11 +304,12 @@ The `gopher:icon` displays an indicator for menu items.
|
||||||
|
|
||||||
:gopher:generate-index (f-)
|
:gopher:generate-index (f-)
|
||||||
'Content-type:_text/html puts eol eol
|
'Content-type:_text/html puts eol eol
|
||||||
'<!DOCTYPE_HTML_PUBLIC_"-//W3C//DTD_HTML_4.01_Transitional//EN"_"http://www.w3.org/TR/html4/loose.dtd"> puts eol
|
'<!DOCTYPE_HTML_PUBLIC_"-//W3C//DTD_HTML_4.01//EN" puts sp
|
||||||
|
'"http://www.w3.org/TR/html4/strict.dtd"> puts eol
|
||||||
'<html><head><meta_http-equiv="Content-Type"_content="text/html;_charset=utf-8"> puts
|
'<html><head><meta_http-equiv="Content-Type"_content="text/html;_charset=utf-8"> puts
|
||||||
'<style_type="text/css">tt_{_white-space:_pre;_} puts
|
'<style_type="text/css">tt_{_white-space:_pre;_} puts
|
||||||
'_*_{_color:_#bbb;_background:_#090909;_font-size:_large;_}_a_{_color:_#FF6600;_} puts
|
'_*_{_color:_#bbb;_background:_#090909;_font-size:_large;_}_a_{_color:_#FF6600;_} puts
|
||||||
'</style><title>forthworks.com</title></head><body> puts eol eol
|
'</style><title>forthworks.com</title></head><body><p> puts eol eol
|
||||||
file:R file:open !FID
|
file:R file:open !FID
|
||||||
@FID file:size !Size
|
@FID file:size !Size
|
||||||
[ buffer gopher:gets
|
[ buffer gopher:gets
|
||||||
|
@ -317,7 +318,7 @@ The `gopher:icon` displays an indicator for menu items.
|
||||||
@FID file:close
|
@FID file:close
|
||||||
[ #70 [ $_ putc ] times ] html:tt html:br eol
|
[ #70 [ $_ putc ] times ] html:tt html:br eol
|
||||||
'forthworks.com:80_/_atua-www_/_running_on_retro gopher:i
|
'forthworks.com:80_/_atua-www_/_running_on_retro gopher:i
|
||||||
'</body></html> puts
|
'</p></body></html> puts
|
||||||
;
|
;
|
||||||
````
|
````
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue