%
% intercept vector of JsLint ownership
%
|Select
 pop
%
% perform Click setting
%
 Task.!Sel
 *tasksels
%
% display node's sub-trees if at top level,
% selected node's jsx if at sub-tree level
%
%%% *jsphviex

%
% display lint tree value
%
sel@
_\\
*entervan
empty
"type" \_
"lintype " log()
<
|functions
% ordinal function module where
&"ordinal " "ordinal" \_ &&;
&"module " "module" \_ &&;
&"where " "where" \_ &&;
|parameters
% ordinal parameter module where
&"ordinal " "ordinal" \_ &&;
&"module " "module" \_ &&;
&"where " "where" \_ &&;
|variables
% ordinal variable module where
&"ordinal " "ordinal" \_ &&;
&"module " "module" \_ &&;
&"where " "where" \_ &&;
|globals
% ordinal global module where
&"ordinal " "ordinal" \_ &&;
&"module " "module" \_ &&;
&"where " "where" \_ &&;
|exceptions
% ordinal exception module where
&"ordinal " "ordinal" \_ &&;
&"module " "module" \_ &&;
&"where " "where" \_ &&;
|errors
% ordinal error source module token where
&"ordinal " "ordinal" \_ &&;
&"error " "error" \_ &&;
&"source " "source" \_ &&;
&"module " "module" \_ &&;
&"where " "where" \_ &&;
|props
% ordinal prop
&"ordinal " "ordinal" \_ &&;
|indexer
% ordinal index flag exact
&"ordinal " "ordinal" \_ &&;
&"flag " "flag" \_ &&;
&"exact " "exact" \_ &&;

> not
{
} if
"SetInfo" Url.(esc)
&
Help.!
 "PostSel" vector()
 true

|Back
 pop
%
% move back up through the task hierarchy
%
 Tree.Unchanged
 *taskback
 *jsphviex(
 "TabVisible(true);"
 Help.!
 "PreSel" vector()
 true

|Return
 pop
 true

|Init
 pop
 @@
 show
 owner(_) _@ false *panelflt
 *helpsame
 *procstop
 @@
 true

%
% receive xml dance
%
|Xml
 pop
 false

%
% end of Run tree dance
%
|xmlRun)
 pop
%%%%%%%%%% *chekphot
 false

%
% other xml types are referred to this owner
%
|xml_)
 pop
"xml_) " count - & logs
 *jsphlinz
%
% show the lint analysis
%
empty !report
*jsphview
_report
"SetInfo" Url.(esc)
Help.!

 _Linting
 {
%
% downstream, Lint is exited, full info is displayed,
% possibly keep linting
%
  *lintback(
  *jsphviex(
  *jsphalls(
 }
 {
 } ifelse

 @@
 true

%
% start of Run tree dance
%
|xmlRun(
 pop false

%
% other xml types are referred to this owner
%
|xml_(
 pop
"xml_( " count - & logs
 true