%
% acceptance vectors for Left Bar (editor version) indicators
%
page@sel
<
|BackPro
 *bkopxlat
 <
 |Initial
  *defbakop
  "Leftopf" *helpface
%
% initialize backops
%
  *bkopinit
%%%  *leftbrbk
  *botmbrbk
%%%  *taskbkeu(

|Back
 *bkopends

%
% chain to next command (items on stack)
% continue with chain of startup since this has started
%

 |Ready
/*
  false !Presel
  "PvwNone()"
%%% Base.!
  Help.!
%%%  editoff
%%%  5426 !tick
%%%  true !Edit.Resume
*/

 |Changed
%
% cable(|strand(|wireop(|wired(|wirex(|wirex2(|wirex3(|wirex4(
%               _Changed changed emode origval newval
/*
  true !Nx;
*/

 |Moded
%
% cable(|strand(|wireop(|wired(|wirex(|wirex2(|wirex3(|wirex4(
%               Moded   changed emode  origval  newval
/*
  wirex(
"edmode" log)(
  !Nx=
  "Load" *nexushub
*/

 |Saved
%
% the save has been made to the BasicData.NewValue
% cable(|strand(|wireop(|wired(|wirex(|wirex2(|wirex3(|wirex4(
%                save  changed  emode  origval  newval
%
/*
%
% mark the changed state
% only process a save to the tree if changed flag present
%
  wired( true? !Nx;
  _Nx;
"nxchgd" log)(
  {
   wirex3( wirex(
%
% initiate the final Save to Nexus
%
   "Save" *nexushub
  } if
%%%  "Preview" *nexushub
%%%  *edtrprvx(
  editoff

%%%  "C" !Help.Group *leftbrop
*/

 >
 {
%
% command processed
%
 }
 {
%
% command not processed, interrogate current group of left bar
%
%%%  *editgriq
 } ifelse

>

*acceptun

%
% stack: found
%