author | kleing |
Thu, 29 Jun 2006 01:08:08 +0200 | |
changeset 19960 | a0e3f2df9b0e |
parent 19959 | dc3e007aeaf1 |
child 19961 | 5aa2e37e250c |
--- a/src/Pure/General/file.ML Wed Jun 28 17:54:00 2006 +0200 +++ b/src/Pure/General/file.ML Thu Jun 29 01:08:08 2006 +0200 @@ -142,7 +142,7 @@ in write target (read from) end); fun copy_dir from to = conditional (not (eq (from, to))) (fn () => - (system_command ("cp -r " ^ shell_path from ^ "/. " ^ shell_path to); ())) + (system_command ("cp -r -f " ^ shell_path from ^ "/. " ^ shell_path to); ())) (* use ML files *)