Commit fa42197d authored by Bruno Guillaume's avatar Bruno Guillaume

Version 0.54.1: Fix #3

parent aaf82cfa
## 0.45.1 (2017/12/07)
Bugfix: [#3](https://gitlab.inria.fr/grew/grew/issues/3) (Bug in GUI with graphviz 2.40)
# 0.45.0 (2017/10/10)
The version number is aligned of the version number of `libcaml-grew` (hence, the jump from 33 to 45!)
* `-old_grs` option
......
......@@ -307,6 +307,20 @@ module Grew_rew_display = struct
while true do
let line = input_line in_ch in
(* ------------------- Hack for bugfix ------------------- *)
(* see: https://gitlab.inria.fr/grew/grew/issues/3 *)
(* output of Graphviz changes in 2.40 and the next lines make it "like" 2.38 output ! *)
let fix_line =
if Str.string_match (Str.regexp "<g id=\".*\" class=\".*\">") line 0
then line ^ (input_line in_ch)
else line in
let line = fix_line
|> (Str.global_replace (Str.regexp_string "#000000") "black")
|> (Str.global_replace (Str.regexp_string "#ffffff") "white") in
(* ---------------- end "Hack for bugfix" ---------------- *)
match !graph_line_counter with
| 0 -> (* matching de la premiere ligne pour un graphe (<!-- GXX -->) *)
if (Str.string_match init line 0)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment