diff options
Diffstat (limited to 'www/geneweb/files/patch-src_relation.ml')
| -rw-r--r-- | www/geneweb/files/patch-src_relation.ml | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/www/geneweb/files/patch-src_relation.ml b/www/geneweb/files/patch-src_relation.ml new file mode 100644 index 000000000000..b34a3c83f85e --- /dev/null +++ b/www/geneweb/files/patch-src_relation.ml @@ -0,0 +1,16 @@ +--- src/relation.ml.orig 2024-02-11 19:02:59 UTC ++++ src/relation.ml +@@ -194,11 +194,11 @@ value old_print_relationship_dag conf base elem_txt vb + let hts = Dag.make_tree_hts conf base elem_txt vbar_txt invert set [] d in + Dag.print_slices_menu_or_dag_page conf base page_title hts next_txt + ; +-end ELSE declare ++end; ELSE declare + value old_print_relationship_dag conf base elem_txt vbar_txt path next_txt = + incorrect_request conf + ; +-end END; ++end; END; + + value add_common_parent base ip1 ip2 set = + let a1 = poi base ip1 in |