Ignore:
Timestamp:
2007-08-13T12:58:02+12:00 (17 years ago)
Author:
qq6
Message:

delete require Win32::Hardlink

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/util.pm

    r14362 r14364  
    386386    # link not supported on windows 9x
    387387    if (($ENV{'GSDLOS'} =~ /^windows$/i) && (Win32::FsType() !~ /^ntfs$/i)) {
     388require Win32::Hardlink;
    388389        print STDERR "util::hard_link: win32: using copy for hard link.\n";
    389390        &File::Copy::copy ($src, $dest);
    390391    } else {
    391         require Win32::Hardlink;
    392392        if (!link($src, $dest)) {
    393393            print STDERR "util::hard_link: unable to create hard link. ";
Note: See TracChangeset for help on using the changeset viewer.