Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[fix] OpaPrint: Bad event printer, plus a hack

  • Loading branch information...
commit 2a0e8bb14d35e201a2376d4e406ab951932f3304 1 parent ea9b4d3
@cedricss cedricss authored
Showing with 2 additions and 1 deletion.
  1. +2 −1  opalang/opaPrint.ml
View
3  opalang/opaPrint.ml
@@ -366,7 +366,8 @@ module Sugar = struct
) (e@"events") in
let events_options = list ~map:(fun e->
str_empty,
- fst (List.hd (fields_list (e@"name")))^":options",
+ (* hack to fix the "onAction" on options: *)
+ "options:on"^(fst (List.hd (fields_list (e@"name")))),
e@"value"
) (e@"events_options") in
let href =
Please sign in to comment.
Something went wrong with that request. Please try again.