Changeset 22119

Timestamp:

2010-05-19T17:50:32+12:00 (14 years ago)

Author:

max

Message:

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

File:

• main/trunk/greenstone2/perllib/util.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/util.pm

@@ -440 +440 @@
     mk_all_dir($dest_dir) if (!-e $dest_dir);
 
-    # link not supported on windows 9x
-    if (($ENV{'GSDLOS'} =~ /^windows$/i) && (Win32::FsType() !~ /^ntfs$/i)) {
-    &File::Copy::copy ($src, $dest);
-
-    } elsif (!link($src, $dest)) {
+
+    if (!link($src, $dest)) {
     if ((!defined $verbosity) || ($verbosity>2)) {
         print STDERR "util::hard_link: unable to create hard link. ";