--- a/STXInstaller.st	Mon Apr 20 15:40:18 1998 +0200
+++ b/STXInstaller.st	Mon Apr 20 17:42:04 1998 +0200
@@ -288,14 +288,15 @@
         actionTextHolder value:nil.
         actionTextHolder value:msg.
 
-        cmd := 'cp -r ../../* ' , fullDir.
-        "/
-        "/ not all systems have cp -rv
-        "/
-        OperatingSystem getOSType = 'linux' ifTrue:[
-            cmd := 'cp -rv ../../* ' , fullDir.
-        ].
-        commandTraceView showCR:cmd , ' ...'.
+        cmd := '(cd ../.. ; tar cf - .) | (cd ' , fullDir , ' ; tar xvf -)'.
+"/        "/
+"/        "/ not all systems have cp -rv
+"/        "/
+"/        OperatingSystem getOSType = 'linux' ifTrue:[
+"/            cmd := 'cp -rv ../../* ' , fullDir.
+"/        ].
+"/      commandTraceView showCR:cmd , ' ...'.
+        commandTraceView showCR:'copying ...'.
         commandTraceView endEntry.
         cmd := cmd , ' 2>&1' .
 
@@ -378,7 +379,7 @@
     "
 
     "Created: / 17.7.1996 / 15:16:20 / cg"
-    "Modified: / 25.2.1998 / 18:30:53 / cg"
+    "Modified: / 20.4.1998 / 17:41:45 / cg"
 !
 
 createDirectories