X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaGui.ml;h=8eb54bb70c03e8e7f939b67737b30a003a04d35e;hb=6abaacea86e652ea0dc7cd2f8ab04005251532cb;hp=01ced58a75217a426518898853f77669fd0594ef;hpb=1c361432e4fd08de7a85c108ccfc6990d6ffd141;p=helm.git diff --git a/helm/software/matita/matitaGui.ml b/helm/software/matita/matitaGui.ml index 01ced58a7..8eb54bb70 100644 --- a/helm/software/matita/matitaGui.ml +++ b/helm/software/matita/matitaGui.ml @@ -860,6 +860,7 @@ class gui () = (fun () -> MatitamakeLib.clean_development_in_bg refresh d) in ignore(clean ()))); + (* publish button hidden, use command line connect_button develList#publishButton (locker (fun () -> match get_devel_selected () with @@ -868,6 +869,8 @@ class gui () = let publish = locker (fun () -> MatitamakeLib.publish_development_in_bg refresh d) in ignore(publish ()))); + *) + develList#publishButton#misc#hide (); connect_button develList#graphButton (fun () -> match get_devel_selected () with | None -> ()