[fix] xhtml: rebase error on eea542f

MLstate · Mar 7, 2012 · 537c44a · 537c44a
1 parent 90f5f03
commit 537c44a
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/stdlib/core/xhtml/xhtml.opa b/stdlib/core/xhtml/xhtml.opa
@@ -850,6 +850,8 @@ Xhtml =
                    | _ -> void
                )
 
+               (load_events, other_events) = List.partition((a -> match a.name:Dom.event.kind {ready} -> true | _ -> false), events)
+               (_,   other_events_options) = List.partition((a -> match a.name:Dom.event.kind {ready} -> true | _ -> false), events_options)
 
                other_events = // take care of event handler that can be inlined in html attribute
                  if XhtmlOptions.options.enable_inlined_event then
@@ -998,7 +1000,7 @@ Xhtml =
      str
    {js_code = js_code;
     html_code = Buf.contents(html_buffer)}
-  )
+ )
 
  /**
   * Convert xhtml to a readable text