From 07089bf8337db9bfd0a9c1318580aff1d8823f43 Mon Sep 17 00:00:00 2001
From: gareuselesinge
Date: Thu, 10 Oct 2013 14:15:33 +0000
Subject: 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
---
 ide/document.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ide')

diff --git a/ide/document.ml b/ide/document.ml
index 9b048320a7..fab318f18f 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 =
-- 
cgit v1.2.3