]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/matitaMathView.ml
...
[helm.git] / helm / software / matita / matitaMathView.ml
index b966de073051f4266a223d21e24c44c4913595b2..c666a34f7d7fe5f06efe5827e3660a5900e7bfc2 100644 (file)
@@ -1578,7 +1578,7 @@ let mathViewer () =
 
     method screenshot status sequents metasenv subst (filename as ofn) =
        let w = GWindow.window ~title:"screenshot" () in
-       let width = 600 in
+       let width = 500 in
        let height = 2000 in
        let m = GMathView.math_view 
           ~font_size:!current_font_size ~width ~height