aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/document.ml
diff options
context:
space:
mode:
authorGravatar gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-10-10 14:15:33 +0000
committerGravatar gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7>2013-10-10 14:15:33 +0000
commit07089bf8337db9bfd0a9c1318580aff1d8823f43 (patch)
treebc66d864dd4a7bc0e4e353b8db3acb27c1525dfc /ide/document.ml
parentc2619b368b352f6f776360356a4f9112095efc06 (diff)
Document: undoing inside a focused zone does not require unfocusing
To test this fake_ide has also been improved with the GOALS command. As for CoqIDE, ADDing a sentence does not force its evaluation. The "advance 1 sentence" button is an ADD + GOALS. If one of the ADDed sentences is wrong, GOALS receives the error. The GUI then backtracks to a safe state id (sent by Coq). fake_ide has GOALS (asserts that the goals call was OK) and FAILGOALS to assert it fails and backtrack to a valid state. see unfdo022.fake. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16873 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/document.ml')
-rw-r--r--ide/document.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/document.ml b/ide/document.ml
index 9b048320a..fab318f18 100644
--- a/ide/document.ml
+++ b/ide/document.ml
@@ -135,7 +135,7 @@ let find_id d f =
| { state_id = Some id; data } when f id data -> Some id
| _ -> None in
try CList.find_map pred top, true with Not_found ->
- try CList.find_map pred focus, focused d with Not_found ->
+ try CList.find_map pred focus, false with Not_found ->
CList.find_map pred bot, true
let before_tip d =