Changeset 25766 for branches/eam_branches/20090820/DataStore/scripts/dsget

Timestamp:

Oct 2, 2009, 5:10:19 PM (17 years ago)

Author:

eugene

Message:

merge changes from trunk

Location:

branches/eam_branches/20090820

Files:

• . (modified) (1 prop)
• DataStore/scripts/dsget (modified) (3 diffs)

branches/eam_branches/20090820/DataStore/scripts/dsget

@@ -69 +69 @@
         undef $copies;
     }
-    if ($copies < 1) {
+    elsif ($copies < 1) {
         die "--copies must be >= 1";
     }
@@ -207 +207 @@
     if (defined $copies and $copies > 1) {
         foreach (1 .. ($copies - 1)) {
-            $neb->replicate($filename, 'any')
+            $neb->replicate($filename)
                 or die "failed to replicate $filename failed: $!";
         }
@@ -214 +214 @@
     $tmp->flush or die "can't flush filehandle: $!";
     $tmp->sync or die "can't sync filehandle: $!";
+    # set read and write permissions based on umask (ignore other bits)
+    my $umask = umask;
+    chmod 0666 ^ $umask, $tmpfilename or die "failed to chmod $tmpfilename";
     rename $tmpfilename, $filename
         or die "renaming $tmpfilename to $filename failed: $!";