diff options
author | 2014-08-24 20:08:23 +0200 | |
---|---|---|
committer | 2014-08-24 20:08:23 +0200 | |
commit | f4b0851f759ebbc467886372f7b0d5c9a1ccd173 (patch) | |
tree | 2891661721304a546420e48190bd99166dcb5d6f | |
parent | ac1344e750395b26513d1ca963107f14e7d0f06f (diff) |
Fixing bug #3404.
-rw-r--r-- | ide/coqide.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coqide.ml b/ide/coqide.ml index 6bb0d7f0f..b0d90f2cb 100644 --- a/ide/coqide.ml +++ b/ide/coqide.ml @@ -704,7 +704,7 @@ let initial_about () = else "" in let msg = initial_string ^ version_info ^ log_file_message () in - notebook#current_term.messages#add msg + on_current_term (fun term -> term.messages#add msg) let coq_icon () = (* May raise Nof_found *) |