- Timestamp:
- 1999-12-07T10:47:54+13:00 (24 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/util.pm
r721 r812 264 264 265 265 # a few sanity checks 266 if (!-e $src) { 266 if (-e $dest) { 267 # destination file already exists 268 return; 269 } 270 elsif (!-e $src) { 267 271 print STDERR "util::hard_link source file $src does not exist\n"; 268 272 return;
Note:
See TracChangeset
for help on using the changeset viewer.