equal
deleted
inserted
replaced
261 ! ! |
261 ! ! |
262 |
262 |
263 !STXInstaller methodsFor:'installing'! |
263 !STXInstaller methodsFor:'installing'! |
264 |
264 |
265 changeWritability |
265 changeWritability |
266 |msg dirsToMake numDirs nDone| |
266 |msg| |
267 |
267 |
268 msg := (resources array:#('ST/X Installation' '' 'making target dir writable' '' '' '')) asStringCollection. |
268 msg := (resources array:#('ST/X Installation' '' 'making target dir writable' '' '' '')) asStringCollection. |
269 |
269 |
270 commandTraceView showCR:(resources string:'making target dir writable ...'). |
270 commandTraceView showCR:(resources string:'making target dir writable ...'). |
271 commandTraceView endEntry. |
271 commandTraceView endEntry. |
274 ] ifFalse:[ |
274 ] ifFalse:[ |
275 OperatingSystem executeCommand:('(cd ' , stxLibDir , ' ; find . -exec chmod u+w {} \;)'). |
275 OperatingSystem executeCommand:('(cd ' , stxLibDir , ' ; find . -exec chmod u+w {} \;)'). |
276 ]. |
276 ]. |
277 ^ true |
277 ^ true |
278 |
278 |
279 "Modified: / 25.2.1998 / 19:20:59 / cg" |
279 "Created: / 17.7.1996 / 15:24:19 / cg" |
280 "Created: / 20.4.1998 / 15:37:52 / cg" |
280 "Modified: / 20.4.1998 / 15:38:59 / cg" |
281 ! |
281 ! |
282 |
282 |
283 copyFiles |
283 copyFiles |
284 |msg fileSpec filesToCopy numFiles nDone cmd| |
284 |msg fileSpec filesToCopy numFiles nDone cmd| |
285 |
285 |