ui.tools.traceback: make it a tool window so that its size is saved, and workspace shortcuts work

db4
Slava Pestov 2010-06-28 17:10:06 -04:00
parent 8c9c0f05d2
commit 350a6522c7
1 changed files with 5 additions and 5 deletions

View File

@ -1,11 +1,11 @@
! Copyright (C) 2006, 2009 Slava Pestov.
! Copyright (C) 2006, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors continuations kernel models namespaces arrays
fry prettyprint ui ui.commands ui.gadgets ui.gadgets.labeled assocs
fry prettyprint sequences inspector models.arrow fonts ui
ui.commands ui.gadgets ui.gadgets.labeled assocs
ui.gadgets.tracks ui.gadgets.buttons ui.gadgets.panes
ui.gadgets.status-bar ui.gadgets.scrollers ui.gadgets.borders
ui.gadgets.tables ui.gestures sequences inspector
models.arrow fonts ;
ui.gadgets.tables ui.gestures ui.tools.common ;
QUALIFIED-WITH: ui.tools.inspector i
IN: ui.tools.traceback
@ -45,7 +45,7 @@ M: stack-entry-renderer row-value drop object>> ;
: <retainstack-display> ( model -- gadget )
[ retain>> ] "Retain stack" <stack-display> ;
TUPLE: traceback-gadget < track ;
TUPLE: traceback-gadget < tool ;
: <traceback-gadget> ( model -- gadget )
[