[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.113, Thu Oct 9 17:59:52 2008 UTC revision 1.114, Thu Oct 16 22:27:09 2008 UTC
# Line 1267  Line 1267 
1267      # Declare the return variable.      # Declare the return variable.
1268      my $retVal;      my $retVal;
1269      # Determine the parameter type.      # Determine the parameter type.
1270      if (! defined $parameter) {      if (! defined $parameter || defined($ENV{TRACING})) {
1271          # Here we're supposed to check the environment. If that fails, we          # Here we're supposed to check the environment. If that fails, we
1272          # get the effective login ID.          # get the effective login ID.
1273          $retVal = $ENV{TRACING} || scalar getpwuid($<);          $retVal = $ENV{TRACING} || scalar getpwuid($<);

Legend:
Removed from v.1.113  
changed lines
  Added in v.1.114

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3