[LON-CAPA-cvs] cvs: doc /help rebuildLabelHash.pl

[albertel]

albertel		Mon Aug 19 22:43:38 2002 EDT

  Modified files:              
    /doc/help	rebuildLabelHash.pl 
  Log:
  - setting reasoanble permissions on the created database
  
  
Index: doc/help/rebuildLabelHash.pl
diff -u doc/help/rebuildLabelHash.pl:1.3 doc/help/rebuildLabelHash.pl:1.4
--- doc/help/rebuildLabelHash.pl:1.3	Thu Jul 18 15:57:14 2002
+++ doc/help/rebuildLabelHash.pl	Mon Aug 19 22:43:38 2002
@@ -39,7 +39,7 @@
 unlink 'fragmentLabels.gdbm' if ( -e 'fragmentLabels.gdbm' );
 print "Wiped old fragmentLabels.gdbm.\n";
 
-tie (my %fragmentLabels, 'GDBM_File', 'fragmentLabels.gdbm', 1, 0);
+tie (my %fragmentLabels, 'GDBM_File', 'fragmentLabels.gdbm', 1, 0660);
 my $error = 0;
 
 chdir "tex";