Changeset 16690
- Timestamp:
- Feb 27, 2008, 2:25:01 PM (18 years ago)
- File:
-
- 1 edited
-
trunk/DataStoreServer/scripts/dsreg (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/DataStoreServer/scripts/dsreg
r16673 r16690 98 98 # Read the product index into a buffer, minus $fileset's entry 99 99 100 open(IO, "$ds_dir/$product/index. txt")101 or die("Failed to open '$ds_dir/$product/index. txt' for reading\n");100 open(IO, "$ds_dir/$product/index.lst") 101 or die("Failed to open '$ds_dir/$product/index.lst' for reading\n"); 102 102 103 103 my $buf; … … 122 122 # Write the new index 123 123 124 open(IO, ">", "$ds_dir/$product/index. txt")125 or die("Failed to open '$ds_dir/$product/index. txt' for writing\n");124 open(IO, ">", "$ds_dir/$product/index.lst") 125 or die("Failed to open '$ds_dir/$product/index.lst' for writing\n"); 126 126 127 127 print IO $buf; … … 133 133 unlink("$ds_dir/$product/$fileset/index.txt") 134 134 or die("Failed to delete '$ds_dir/$product/$fileset/index.txt'\n"); 135 136 135 137 136 # Check the root index; if the fileset we just removed was the
Note:
See TracChangeset
for help on using the changeset viewer.
