equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 2003 by eXept Software AG |
4 COPYRIGHT (c) 2003 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
460 cmd isNil ifTrue:[ |
462 cmd isNil ifTrue:[ |
461 errorStream nextPutAll:'No command for archive operation.'. |
463 errorStream nextPutAll:'No command for archive operation.'. |
462 ^ false |
464 ^ false |
463 ]. |
465 ]. |
464 osProcess := OSProcess new |
466 osProcess := OSProcess new |
465 command:cmd; |
467 command:cmd directory:aDirectory; |
466 lineWise:true; "do it lineWise, since outStream may be an ActorStream" |
468 lineWise:true; "do it lineWise, since outStream may be an ActorStream" |
467 outStream:outStream; |
469 outStream:outStream; |
468 errorStream:errorStream; |
470 errorStream:errorStream. |
469 directory:aDirectory. |
|
470 |
471 |
471 synchron isNil ifTrue:[synchron := true]. |
472 synchron isNil ifTrue:[synchron := true]. |
472 synchron ifTrue:[ |
473 synchron ifTrue:[ |
473 ^ osProcess execute. |
474 ^ osProcess execute. |
474 ] ifFalse:[ |
475 ] ifFalse:[ |