steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Declare default style block is CSS (fixes Konqueror and Safari).

cvs
Trent Buck 2006-01-31 11:04:52 +00:00
parent 4fd83b3373
commit ce2f3322e8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/httpd/html.factor
View File

@ -187,7 +187,7 @@ M: html-stream with-nested-stream ( quot style stream -- )
M: html-stream stream-terpri [ <br/> ] with-stream* ; M: html-stream stream-terpri [ <br/> ] with-stream* ;
: default-css ( -- ) : default-css ( -- )
<style "text/css" =type> <style "text/css" =type style>
"A:link { text-decoration: none; color: black; }" print "A:link { text-decoration: none; color: black; }" print
"A:visited { text-decoration: none; color: black; }" print "A:visited { text-decoration: none; color: black; }" print
"A:active { text-decoration: none; color: black; }" print "A:active { text-decoration: none; color: black; }" print