[Bio] / FigKernelPackages / Tracer.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/Tracer.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.49, Wed Jun 14 00:54:59 2006 UTC revision 1.50, Wed Jun 14 01:00:41 2006 UTC
# Line 2067  Line 2067 
2067          ChDir($dirName);          ChDir($dirName);
2068          # Get the group ID.          # Get the group ID.
2069          my $gid = getgrnam($group);          my $gid = getgrnam($group);
2070          Trace("Fixing permissions for directory $dirName using group $group($gid).") if T(2);          # Get the mask for tracing.
2071            my $traceMask = sprintf("%04o", $mask);
2072            Trace("Fixing permissions for directory $dirName using group $group($gid) and mask $traceMask.") if T(2);
2073          my $fixCount = 0;          my $fixCount = 0;
2074          my $lookCount = 0;          my $lookCount = 0;
2075          # @dirs will be a stack of directories to be processed.          # @dirs will be a stack of directories to be processed.
# Line 2105  Line 2107 
2107                      Trace("Checking member $thisMem.") if T(4);                      Trace("Checking member $thisMem.") if T(4);
2108                      $lookCount++;                      $lookCount++;
2109                      if ($lookCount % 1000 == 0) {                      if ($lookCount % 1000 == 0) {
2110                          Trace("$lookCount members examined. Current is $thisMem.") if T(3);                          Trace("$lookCount members examined. Current is $thisMem. Mask is $traceMask") if T(3);
2111                      }                      }
2112                      # Fix the group.                      # Fix the group.
2113                      chown -1, $gid, $thisMem;                      chown -1, $gid, $thisMem;

Legend:
Removed from v.1.49  
changed lines
  Added in v.1.50

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3