Mercurial > urweb

diff src/cjrize.sml @ 643:aa2290c32ce2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Avoid any JavaScript when pages don't need it; update demo prose
author Adam Chlipala <adamc@hcoop.net>
date Tue, 10 Mar 2009 10:44:26 -0400
parents 63b0bcacd535
children f73913d97a40
line wrap: on
line diff
--- a/src/cjrize.sml	Sun Mar 08 20:34:21 2009 -0400
+++ b/src/cjrize.sml	Tue Mar 10 10:44:26 2009 -0400
@@ -519,7 +519,7 @@
             val (ts, sm) = ListUtil.foldlMap cifyTyp sm ts
             val (t, sm) = cifyTyp (t, sm)
         in
-            (NONE, SOME (ek, "/" ^ s, n, ts, t), sm)
+            (NONE, SOME (ek, "/" ^ s, n, ts, t, L'.ServerAndClient), sm)
         end
 
       | L.DTable (s, xts) =>