equal
deleted
inserted
replaced
227 msg at:4 put:' ' , (fileName asText allBold). |
227 msg at:4 put:' ' , (fileName asText allBold). |
228 msg at:6 put:' ' , (destDir asText allBold). |
228 msg at:6 put:' ' , (destDir asText allBold). |
229 actionTextHolder value:nil. |
229 actionTextHolder value:nil. |
230 actionTextHolder value:msg. |
230 actionTextHolder value:msg. |
231 |
231 |
232 cmd := 'cp -r ../../' , fileName , ' ' , destDir. |
232 "/ cmd := 'cp -r ../../' , fileName , ' ' , destDir. |
|
233 cmd := '(cd ../.. ; tar cf - ' , fileName , ') | (cd ' , destDir , ' ; tar xf -)'. |
233 commandTraceView showCR:cmd , ' ...'. |
234 commandTraceView showCR:cmd , ' ...'. |
234 cmd := 'sh -c "echo ; ' , cmd , ' 2>&1"' . |
235 cmd := 'sh -c "echo ; ' , cmd , ' 2>&1"' . |
235 |
236 |
236 doneSemaphore := Semaphore new. |
237 doneSemaphore := Semaphore new. |
237 |
238 |