diff src/monoize.sml @ 926:358fca527886

Prevent event bubbling
author Adam Chlipala <adamc@hcoop.net>
date Sat, 12 Sep 2009 10:03:12 -0400
parents b873feb3eb52
children 2a50da66ffd8
line wrap: on
line diff
--- a/src/monoize.sml	Sat Sep 12 09:31:50 2009 -0400
+++ b/src/monoize.sml	Sat Sep 12 10:03:12 2009 -0400
@@ -2523,7 +2523,7 @@
                                                          (L'.EPrim (Prim.String s'), loc),
                                                          (L'.EStrcat (
                                                           (L'.EJavaScript (L'.Attribute, e), loc),
-                                                          (L'.EPrim (Prim.String "'"), loc)), loc)),
+                                                          (L'.EPrim (Prim.String ";return false'"), loc)), loc)),
                                                          loc)), loc),
                                            fm)
                                       end