: 190599 (I Hassine):CWD editiert auch die Fehlermeldungen.
IF  
  O /ED/ED$$; ER /ED/ED$$ ;WAIT; $@
THEN
  TRUE;
FI;  
ENVEDITOR=0;
FOR LINE IN -L `ENVSET`   : SUCHE NACH EDITOR
DO
   IF TEST SEG[2,8]($LINE)='EDITOR='   : EDITOR BESETZT
   THEN
      ENVEDITOR=1;
   FI;
DONE;
IF TEST $ENVEDITOR=1       
THEN
    IF ER /NIL; WAIT; $EDITOR /ED/ED$$;
    THEN 
        TRUE; 
    FI;
ELSE                    
    IF ER /NIL; WAIT; WE /ED/ED$$;
    THEN
        TRUE;
    FI;
FI;
RM /ED/ED$$;
EXIT (0); 



















