diff options
| author | vsiles | 2010-05-04 16:56:40 +0000 |
|---|---|---|
| committer | vsiles | 2010-05-04 16:56:40 +0000 |
| commit | 0583805fa794380eb9031e2c8a147fee7facacf0 (patch) | |
| tree | fa6e0788a02d8844390fb859e7fa3c10a456ddd0 /ide | |
| parent | 1b350172cd8448a30ac9a4167a16ca5aaac2b619 (diff) | |
- Fixing bug #2308 about Lemma ... with
- Fixing a wierd behaviour of the goal window (scroll_at_iter doesn't work)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12991 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide')
| -rw-r--r-- | ide/ideproof.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/ide/ideproof.ml b/ide/ideproof.ml index 3d86f52c62..fe8a70e017 100644 --- a/ide/ideproof.ml +++ b/ide/ideproof.ml @@ -70,8 +70,10 @@ let mode_tactic sel_cb (proof:GText.view) = function List.iter insert_hyp hyps; insert_goal cur_goal cur_goal_menu 1 goals_cnt; Util.list_fold_left_i (fun i _ (_,(g,_)) -> insert_goal g [] i goals_cnt) 2 () rem_goals; - ignore (proof#scroll_to_iter - ((proof#buffer#get_iter_at_mark `INSERT)#backward_lines (3*goals_cnt - 2))) + ignore(proof#buffer#place_cursor + ((proof#buffer#get_iter_at_mark `INSERT)#backward_lines (3*goals_cnt - 2))); + ignore(proof#scroll_to_mark `INSERT) + let mode_cesar (proof:GText.view) = function | [] -> assert false |