# HG changeset patch
# User Adam Chlipala <adamc@hcoop.net>
# Date 1252764192 14400
# Node ID 358fca527886e24177908ab0052ef946c43e9031
# Parent  552c989c16017e1828d6b454226b1c81b4bb4a52
Prevent event bubbling

diff -r 552c989c1601 -r 358fca527886 src/monoize.sml
--- 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