FileApplicationNoteBook.st
branchjv
changeset 16571 cf319f2e56d0
parent 16147 fb39152235e3
parent 16513 47d46f573bb1
child 16638 5c5862fafec7
equal deleted inserted replaced
16570:dc5e958a20dc 16571:cf319f2e56d0
  4631         master tabStringAdd:string for:self.
  4631         master tabStringAdd:string for:self.
  4632     ].
  4632     ].
  4633     self notify:'shell in ' , self fileName asString, ' finished'.
  4633     self notify:'shell in ' , self fileName asString, ' finished'.
  4634     terminalView cr.
  4634     terminalView cr.
  4635 
  4635 
  4636     text := '>> shell terminated.' allBold.
  4636     text := '>> shell terminated.' allBold withColor:#red.
  4637     text colorizeAllWith:Color red.
       
  4638     terminalView nextPutAll:text.
  4637     terminalView nextPutAll:text.
  4639 !
  4638 !
  4640 
  4639 
  4641 startShell
  4640 startShell
  4642     |vt100|
  4641     |vt100|