Mercurial > urweb

diff src/jscomp.sml @ 977:2ecf308772ba

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Might have fixed demo/listEdit
author Adam Chlipala <adamc@hcoop.net>
date Thu, 24 Sep 2009 07:52:57 -0400
parents 68eda5b0636d
children e1f3f1ea8cff
line wrap: on
line diff
--- a/src/jscomp.sml	Tue Sep 22 17:12:20 2009 -0400
+++ b/src/jscomp.sml	Thu Sep 24 07:52:57 2009 -0400
@@ -910,9 +910,9 @@
                                               ^ "\"},cons("),
                                          e,
                                          str (",cons({c:\"c\",v:function(s){var t=s.split(\"/\");var i=0;return "
-                                              ^ unurl ^ "}},cons({c:\"!\",e:"),
+                                              ^ unurl ^ "}},cons("),
                                          ek,
-                                         str ("},cons("
+                                         str (",cons("
                                               ^ (case eff of
                                                      ReadCookieWrite => "true"
                                                    | _ => "false")
@@ -929,9 +929,9 @@
                                 (strcat [str ("{c:\"f\",f:rv,a:cons("),
                                          e,
                                          str (",cons({c:\"c\",v:function(s){var t=s.split(\"/\");var i=0;return "
-                                              ^ unurl ^ "}},cons({c:\"!\",e:"),
+                                              ^ unurl ^ "}},cons("),
                                          ek,
-                                         str ("},null)))}")],
+                                         str (",null)))}")],
                                  st)
                             end