aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/tags.ml
diff options
context:
space:
mode:
authorGravatar gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-08-11 11:54:04 +0000
committerGravatar gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-08-11 11:54:04 +0000
commitf41f7162a216547b073d4a7f239b14d9379337eb (patch)
tree465885fb70a388ac92273b54964feee05d5ce349 /ide/tags.ml
parent1a2242d6bdeaf53f0856b26e64b4fdbe2ce8fd0a (diff)
Automatic backtracking if locked zone is edited
That is pretty tricky, and is not as nice I would like for to_process text (that is still considered as locked). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16698 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/tags.ml')
-rw-r--r--ide/tags.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/ide/tags.ml b/ide/tags.ml
index e668616bf..a91905dcd 100644
--- a/ide/tags.ml
+++ b/ide/tags.ml
@@ -22,9 +22,9 @@ struct
let comment_sentence = make_tag table ~name:"comment_sentence" []
let error = make_tag table ~name:"error" [`UNDERLINE `DOUBLE ; `FOREGROUND "red"]
let error_bg = make_tag table ~name:"error_bg" [`BACKGROUND "#FFCCCC"]
- let to_process = make_tag table ~name:"to_process" [`BACKGROUND !processing_color ;`EDITABLE false]
- let processed = make_tag table ~name:"processed" [`BACKGROUND !processed_color;`EDITABLE false]
- let unjustified = make_tag table ~name:"unjustified" [`BACKGROUND "gold";`EDITABLE false]
+ let to_process = make_tag table ~name:"to_process" [`BACKGROUND !processing_color]
+ let processed = make_tag table ~name:"processed" [`BACKGROUND !processed_color]
+ let unjustified = make_tag table ~name:"unjustified" [`BACKGROUND "gold"]
let found = make_tag table ~name:"found" [`BACKGROUND "blue"; `FOREGROUND "white"]
let sentence = make_tag table ~name:"sentence" []
let tooltip = make_tag table ~name:"tooltip" [] (* debug:`BACKGROUND "blue" *)