Changeset 15349 in project
- Timestamp:
- 08/07/09 13:40:44 (11 years ago)
- Location:
- release/4/doctype
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
release/4/doctype/doctype.scm
r10966 r15349 13 13 xhtml-1.0-frameset 14 14 html-3.2 15 html-2.0) 15 html-2.0 16 doctype-rules) 16 17 17 (import scheme)18 (import scheme data-structures) 18 19 19 (define html-4.01-strict 20 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\" \"http://www.w3.org/TR/html4/strict.dtd\">") 21 (define xhtml-1.0-strict 22 "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">") 23 (define html-4.01-transitional 24 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" \"http://www.w3.org/TR/html4/loose.dtd\">") 25 (define xhtml-1.0-transitional 26 "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">") 27 (define html-4.01-frameset 28 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Frameset//EN\" \"http://www.w3.org/TR/html4/frameset.dtd\">") 29 (define xhtml-1.0-frameset 30 "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd\">") 31 (define html-3.2 32 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">") 33 (define html-2.0 34 "<!DOCTYPE HTML PUBLIC \"-//IETF//DTD HTML//EN\">")) 20 (define html-4.01-strict 21 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\" \"http://www.w3.org/TR/html4/strict.dtd\">") 22 (define xhtml-1.0-strict 23 "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">") 24 (define html-4.01-transitional 25 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" \"http://www.w3.org/TR/html4/loose.dtd\">") 26 (define xhtml-1.0-transitional 27 "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">") 28 (define html-4.01-frameset 29 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Frameset//EN\" \"http://www.w3.org/TR/html4/frameset.dtd\">") 30 (define xhtml-1.0-frameset 31 "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd\">") 32 (define html-3.2 33 "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">") 34 (define html-2.0 35 "<!DOCTYPE HTML PUBLIC \"-//IETF//DTD HTML//EN\">") 36 37 (define doctype-rules 38 `((html-4.01-strict *preorder* . ,(constantly html-4.01-strict)) 39 (xhtml-1.0-strict *preorder* . ,(constantly xhtml-1.0-strict)) 40 (html-4.01-transitional *preorder* . ,(constantly html-4.01-transitional)) 41 (xhtml-1.0-transitional *preorder* . ,(constantly xhtml-1.0-transitional)) 42 (html-4.01-frameset *preorder* . ,(constantly html-4.01-frameset)) 43 (xhtml-1.0-frameset *preorder* . ,(constantly xhtml-1.0-frameset)) 44 (html-3.2 *preorder* . ,(constantly html-3.2)) 45 (html-2.0 *preorder* . ,(constantly html-3.2)))) 46 ) -
release/4/doctype/doctype.setup
r10966 r15349 4 4 (install-extension 'doctype 5 5 '("doctype.so" "doctype.import.scm") 6 '((documentation "doctype.html") (version 1. 1)))6 '((documentation "doctype.html") (version 1.2)))
Note: See TracChangeset
for help on using the changeset viewer.