diff --git a/extra/ui/tools/walker/walker.factor b/extra/ui/tools/walker/walker.factor index 3588b44644..e5141fb844 100755 --- a/extra/ui/tools/walker/walker.factor +++ b/extra/ui/tools/walker/walker.factor @@ -61,12 +61,11 @@ M: walker-gadget focusable-child* swap >>continuation swap >>status dup continuation>> >>traceback - [ - toolbar, - g status>> self f track, - g traceback>> 1 track, - ] make-gadget ; + dup f track-add* + dup status>> self f track-add* + dup traceback>> 1 track-add* ; + : walker-help ( -- ) "ui-walker" help-window ; \ walker-help H{ { +nullary+ t } } define-command