%
% external process run within frame
%
% start a frame container
%

%%% @@

help@ _@

"Webber" "StdFrame" newsub
dup .!_Helper
dup !Helping
floatup
*archarea rot .50 add tuck .50 sub perscreen
second !Web.Width
dup !Web.Height
4 copy App.DimSub
"TitleChange|
 unescape
 'titlechg' log()
 pop
" Mep.Can
"Message|
 unescape
 'message' log()
 *runfranf
 pop
" Mep.Can
"Initial|
 unescape
 'initial' log()
 pop
" Mep.Can
"Status|
 _Url.Value unescape
 'status' log()
 pop
" Mep.Can
"Final|
 _Url.Value unescape
 'final' log()
 pop
" Mep.Can
"Focus|
 _Url.Value unescape
 'focus' log()
 pop
" Mep.Can
"Titled|
 unescape
 'titled' log()
 pop
" Mep.Can
@^Browser
@^DimWeb
%
% set the grid focus to general purpose grid
%
.01 .01 .98 .98 Tree.Dims