aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/coqide.ml
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2004-07-18 11:47:01 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2004-07-18 11:47:01 +0000
commit8e01fae88684a49be9556cf9f11289e001975502 (patch)
tree900db059df5de6c46bb545ee78a8dba0ca53d63e /ide/coqide.ml
parent7f1a49c8d55136a95f8cf9fecf0c946629845fa8 (diff)
Abstraction vis a vis du type loc pour ocaml 3.08
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5951 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/coqide.ml')
-rw-r--r--ide/coqide.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coqide.ml b/ide/coqide.ml
index 5922f1edb..bfbee58ca 100644
--- a/ide/coqide.ml
+++ b/ide/coqide.ml
@@ -974,7 +974,7 @@ object(self)
self#set_message s;
message_view#misc#draw None;
if localize then
- (match loc with
+ (match Util.option_app Util.unloc loc with
| None -> ()
| Some (start,stop) ->
let convert_pos = byte_offset_to_char_offset phrase in