diff options
| author | herbelin | 2005-05-20 07:38:25 +0000 |
|---|---|---|
| committer | herbelin | 2005-05-20 07:38:25 +0000 |
| commit | 6b9fe746af01222454a11b4c260f09e85f132494 (patch) | |
| tree | dec6aff3b14ca7c1373fb2802f76684e7ff5c6b7 | |
| parent | 1730ea4d9ee68e7b244d152690a1480a575d3989 (diff) | |
Achèvement du déplacement de fonctionnalités unix et browser de ide vers lib
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7046 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | ide/coqide.ml | 1 | ||||
| -rw-r--r-- | ide/ideutils.mli | 2 | ||||
| -rw-r--r-- | ide/preferences.ml | 2 |
3 files changed, 2 insertions, 3 deletions
diff --git a/ide/coqide.ml b/ide/coqide.ml index bd06c0b07d..63e6c1178b 100644 --- a/ide/coqide.ml +++ b/ide/coqide.ml @@ -26,6 +26,7 @@ let (proof_view:GText.view option ref) = ref None let (_notebook:GPack.notebook option ref) = ref None let notebook () = out_some !_notebook +let run_command = System.run_command try_convert (* Tabs contain the name of the edited file and 2 status informations: Saved state + Focused proof buffer *) diff --git a/ide/ideutils.mli b/ide/ideutils.mli index ff6614dfb4..bb32b34b43 100644 --- a/ide/ideutils.mli +++ b/ide/ideutils.mli @@ -46,8 +46,6 @@ val stock_to_widget : ?size:Gtk.Tags.icon_size -> GtkStock.id -> GObj.widget open Format val print_list : (formatter -> 'a -> unit) -> formatter -> 'a list -> unit -val run_command : (string -> unit) -> string -> Unix.process_status*string - val prime : Glib.unichar val underscore : Glib.unichar diff --git a/ide/preferences.ml b/ide/preferences.ml index 3e4a335748..ae038ef66e 100644 --- a/ide/preferences.ml +++ b/ide/preferences.ml @@ -123,7 +123,7 @@ let (current:pref ref) = modifiers_valid = [`SHIFT; `CONTROL; `MOD1; `MOD4]; - cmd_browse = Options.browser_cmd_fmt + cmd_browse = Options.browser_cmd_fmt; cmd_editor = if Sys.os_type = "Win32" then "NOTEPAD ", "" |