--- a/Unix.st	Sat Mar 30 15:09:11 1996 +0100
+++ b/Unix.st	Tue Apr 02 18:30:51 1996 +0200
@@ -3154,6 +3154,15 @@
      ^ Array with:fd1 with:fd2.
 !
 
+recursiveCopyDirectory:sourcePathName to:destination
+    "copy the directory named 'sourcePathName' and all contained files/directories to 'destination'.
+     Return true if successful."
+
+    ^ self executeCommand:('cp -rf ' , sourcePathName, ' ', destination)
+
+    "Modified: 7.3.1996 / 15:26:30 / cg"
+!
+
 recursiveCreateDirectory:dirName
     "create a directory - with all parent dirs if needed.
      Return true if successful, false otherwise. If false
@@ -7271,6 +7280,6 @@
 !OperatingSystem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.132 1996-03-23 17:22:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Unix.st,v 1.133 1996-04-02 16:30:51 ca Exp $'
 ! !
 OperatingSystem initialize!