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, 4 insertions, 1 deletions
diff --git a/ide/ideutils.ml b/ide/ideutils.ml
index 2ae46fc7e..d8ca34f98 100644
--- a/ide/ideutils.ml
+++ b/ide/ideutils.ml
@@ -130,7 +130,10 @@ let mktimer () =
kill =
(fun () -> match !timer with
| None -> ()
- | Some id -> GMain.Timeout.remove id; timer := None) }
+ | Some id ->
+ (try GMain.Timeout.remove id
+ with Glib.GError _ -> ());
+ timer := None) }
let last_dir = ref ""