From 5d628ba4a253f86c9796a10a344b8ce9c176cf9b Mon Sep 17 00:00:00 2001 From: gareuselesinge Date: Mon, 30 Sep 2013 16:09:58 +0000 Subject: wg_Command: detachable, less "from the 80s", query pane - Tabs have labels derived from the query (e.g. "About eq_ind" will have "eq_ind" as its label, that is better than "Page 1" ;-) - Tabs have a [x] close icon - Icon to create a new tab in in the notebook - Dispotically grab the F1 key to open/close the query pane (alt-esc is grabbed by windows managers these days) - Esc hides the query pane (like the search pane) - F1 puts a detached query pane in front - Tab switches from the combo-box to the entry on its right - Detaching is taken-over, and the query pane is reparented in a regular window that can be resized - A detached query pane can be put back by closing the window git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16817 85f007b7-540e-0410-9357-904b9bb8a0f7 --- ide/session.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'ide/session.ml') diff --git a/ide/session.ml b/ide/session.ml index e094ac996..31e76935f 100644 --- a/ide/session.ml +++ b/ide/session.ml @@ -233,7 +233,7 @@ let create file coqtop_args = let script = create_script coqtop buffer in let proof = create_proof () in let messages = create_messages () in - let command = new Wg_Command.command_window coqtop ~mark_as_broken:(fun _ -> ()) ~mark_as_processed:(fun _ -> ()) ~cur_state:(fun () -> Obj.magic 0) in + let command = new Wg_Command.command_window basename coqtop in let finder = new Wg_Find.finder (script :> GText.view) in let fops = new FileOps.fileops (buffer :> GText.buffer) file reset in let _ = fops#update_stats in @@ -308,7 +308,7 @@ let build_layout (sn:session) = end) in session_box#pack sn.finder#coerce; - session_paned#pack2 ~shrink:false ~resize:false (sn.command#frame#coerce); + sn.command#pack_in (session_paned#pack2 ~shrink:false ~resize:false); script_scroll#add sn.script#coerce; proof_scroll#add sn.proof#coerce; message_frame#add sn.messages#coerce; -- cgit v1.2.3