X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2FmatitaGui.ml;h=b3ebebd9054378d059e6cc1aa19327b806af60ee;hb=fdc7fbf786e14766cc598c75fae0650c219d679a;hp=34406a3cd147908ef96d76a9804ecafc3064815f;hpb=7906a230a7989fab555d50ae930bb4169cb5d631;p=helm.git diff --git a/matita/matitaGui.ml b/matita/matitaGui.ml index 34406a3cd..b3ebebd90 100644 --- a/matita/matitaGui.ml +++ b/matita/matitaGui.ml @@ -206,6 +206,11 @@ class gui () = ~website:"http://helm.cs.unibo.it" () in + connect_menu_item main#contentsMenuItem (fun () -> + let cmd = + sprintf "gnome-help ghelp://%s/C/matita.xml &" BuildTimeConf.help_dir + in + ignore (Sys.command cmd)); connect_menu_item main#aboutMenuItem about_dialog#present; (* findRepl win *) let show_find_Repl () =