Mercurial > urweb
diff src/settings.sml @ 1956:ac1be85e91ad
Add 'html5' .urp directive
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Thu, 09 Jan 2014 17:27:24 -0500 |
parents | 0992323fa264 |
children | 3cc14f1e47d1 |
line wrap: on
line diff
--- a/src/settings.sml Tue Jan 07 08:36:18 2014 -0500 +++ b/src/settings.sml Thu Jan 09 17:27:24 2014 -0500 @@ -716,4 +716,8 @@ else "\"" ^ lowercase s ^ "\"" fun mangleSqlCatalog s = if !mangle then "uw_" ^ s else lowercase s +val html5 = ref false +fun setIsHtml5 b = html5 := b +fun getIsHtml5 () = !html5 + end