diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-12-10 18:33:44 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-12-10 18:33:44 +0000 |
| commit | b0ab21a5a94b09170ff60cd4a405afa5287d7867 (patch) | |
| tree | c30845df1fbe51a08f3be5608dca81b0915b5f8d /ide/tags.ml | |
| parent | 2de75892efb8c2ab63a3b23767d0cefd0996f8d6 (diff) | |
Coqide: restore the tag removal of copy-pasted zones
The handler for apply_tag removed in commit 16044 was probaly meant
for that. We now proceed in a more simple way, in Sentence.split_slice_lax,
instead of doing a remove_tag in a apply_tag handler (!).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16058 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/tags.ml')
| -rw-r--r-- | ide/tags.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/ide/tags.ml b/ide/tags.ml index cde831513..3d0e873a7 100644 --- a/ide/tags.ml +++ b/ide/tags.ml @@ -26,6 +26,9 @@ struct let unjustified = make_tag table ~name:"unjustified" [`BACKGROUND "gold";`EDITABLE false] let found = make_tag table ~name:"found" [`BACKGROUND "blue"; `FOREGROUND "white"] let sentence = make_tag table ~name:"sentence" [] + let all = + [comment_sentence; error; to_process; processed; unjustified; + found; sentence] end module Proof = struct |