Ticket #591: portinstall-symlinkdir.patch
File portinstall-symlinkdir.patch, 645 bytes (added by ranger@…, 21 years ago) |
---|
-
portinstall.tcl
RCS file: /Volumes/src/cvs/od/proj/darwinports/base/src/port1.0/portinstall.tcl,v retrieving revision 1.60 diff -u -r1.60 portinstall.tcl
70 70 71 71 proc install_element {src_element dst_element} { 72 72 # don't recursively copy directories 73 if {[file isdirectory $src_element] } {73 if {[file isdirectory $src_element] && [file type $src_element] != "link"} { 74 74 file mkdir $dst_element 75 75 } else { 76 76 file copy -force $src_element $dst_element