anchor.diff:  {$mode delphi}
   program dboutln;
  -uses xpc, udboutln, custapp, classes, kvm, cw, uminneron;
  +uses xpc, udboutln, custapp, classes, kvm, cw, uminneron, stri;
   
   const
  -  kCMD_CREATE_NODE = 00; 
  -  kCMD_CREATE_TYPE = 01; 
  -  kCMD_INSERT_NODE = 02; 
  +  kCMD_CREATE_NODE = 00;
  +  kCMD_CREATE_TYPE = 01;
  +  kCMD_INSERT_NODE = 02;
     kCMD_NUDGE_NEXT  = 03;
     kCMD_NUDGE_PREV  = 04;
   
  
positive.code: begin
    db := connect('minneron.sdb');
    App := TDbOutlnApp.Create(db);
    App.Initialize;
    App.Run;
    db.Free;
    clrscr; fg(7); bg(0);
  end.
  
negative.code: 
        keyMap[^L ] := view.Redraw;
      end;
      fg('K'); fillscreen('!@#$%^&*(){}][/=+?-_;:');
      view.Redraw;
    end;
  
  