[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.12, Thu Jun 23 23:21:09 2005 UTC revision 1.13, Tue Jun 28 21:26:24 2005 UTC
# Line 161  Line 161 
161          if ($category eq '*') {          if ($category eq '*') {
162              $AllTrace = 1;              $AllTrace = 1;
163          } else {          } else {
164              $Categories{$category} = 1;              $Categories{lc $category} = 1;
165          }          }
166      }      }
167      # Now we need to process the destination information. The most important special      # Now we need to process the destination information. The most important special
# Line 734  Line 734 
734          }          }
735          # Save the category name.          # Save the category name.
736          $LastCategory = $category;          $LastCategory = $category;
737            # Convert it to lower case before we hash it.
738            $category = lc $category;
739          # Use the category and tracelevel to compute the result.          # Use the category and tracelevel to compute the result.
740          $retVal = ($traceLevel <= $TraceLevel && ($AllTrace || exists $Categories{$category}));          $retVal = ($traceLevel <= $TraceLevel && ($AllTrace || exists $Categories{$category}));
741      }      }

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3