From: Enrico Tassi Date: Fri, 16 Nov 2007 19:34:32 +0000 (+0000) Subject: hidded publish-devel button, too dangerous for the casual user X-Git-Tag: 0.4.97@7895~1 X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=commitdiff_plain;h=ef84ff859b6dbf3b2f65ef76215e4162894bc7a9 hidded publish-devel button, too dangerous for the casual user --- diff --git a/matita/matitaGui.ml b/matita/matitaGui.ml index 01ced58a7..8eb54bb70 100644 --- a/matita/matitaGui.ml +++ b/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 -> ()