Changeset 22119

Show
Ignore:
Timestamp:
19.05.2010 17:50:32 (9 years ago)
Author:
max
Message:

Don't check for NTFS anymore because link should take care of saying if hardlinking is supported or not.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/util.pm

    r21762 r22119  
    440440    mk_all_dir($dest_dir) if (!-e $dest_dir); 
    441441 
    442     # link not supported on windows 9x 
    443     if (($ENV{'GSDLOS'} =~ /^windows$/i) && (Win32::FsType() !~ /^ntfs$/i)) { 
    444     &File::Copy::copy ($src, $dest); 
    445  
    446     } elsif (!link($src, $dest)) { 
     442 
     443    if (!link($src, $dest)) { 
    447444    if ((!defined $verbosity) || ($verbosity>2)) { 
    448445        print STDERR "util::hard_link: unable to create hard link. ";