aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/ideutils.ml
diff options
context:
space:
mode:
Diffstat (limited to 'ide/ideutils.ml')
-rw-r--r--ide/ideutils.ml5
1 files changed, 3 insertions, 2 deletions
diff --git a/ide/ideutils.ml b/ide/ideutils.ml
index db0f82b16..19f5070b4 100644
--- a/ide/ideutils.ml
+++ b/ide/ideutils.ml
@@ -210,9 +210,10 @@ let find_tag_stop (tag :GText.tag) (it:GText.iter) =
let find_tag_limits (tag :GText.tag) (it:GText.iter) =
(find_tag_start tag it , find_tag_stop tag it)
-let async =
+let async =
+(*
if Sys.os_type <> "Unix" then GtkThread.async else (fun x -> x)
-
+*) fun x -> x
let stock_to_widget ?(size=`DIALOG) s =
let img = GMisc.image ()