[Orca-checkins] r313 - trunk/orca/lib/Orca

Blair Zajac blair at orcaware.com
Thu May 13 21:40:16 PDT 2004


Author: blair
Date: Thu May 13 21:38:31 2004
New Revision: 313

Modified:
   trunk/orca/lib/Orca/SourceFile.pm
Log:
* lib/Orca/SourceFile.pm
  (add_plots):
    Fix some comments to represent what the code actually does.


Modified: trunk/orca/lib/Orca/SourceFile.pm
==============================================================================
--- trunk/orca/lib/Orca/SourceFile.pm	(original)
+++ trunk/orca/lib/Orca/SourceFile.pm	Thu May 13 21:38:31 2004
@@ -352,9 +352,9 @@
     }
 
     # There are three cases to handle:
-    # 1) Regular expression match in the first data with additional datas.
-    # 2) Regular expression match in the first data with no additional datas.
-    # 3) All others.
+    # 1) Regular expression match in the first data with no additional datas.
+    # 2) Regular expression match in the first data with additional datas.
+    # 3) All others cases.
     # The first is a single data source that has a regular expression.  In
     # this case, all of the columns are searched to match the regular
     # expression.  This generates a single plot with all of the different
@@ -374,7 +374,7 @@
       }
     }
 
-    # 1) Regular expression match in the first data with additional datas.
+    # 1) Regular expression match in the first data with no additional datas.
     if ($number_datas == 1 and $regexp_element_index != -1) {
 
       # If we've gone up to the last column to match, then go on.
@@ -463,7 +463,7 @@
       next unless $new_data_index;
     }
 
-    # 2) Regular expression match in the first data with no additional datas.
+    # 2) Regular expression match in the first data with additional datas.
     elsif ($number_datas > 1 and $regexp_element_index != -1) {
       $handle_regexps = 1;
 
@@ -527,7 +527,7 @@
       $i = $plot->{flush_regexps} ? $oldest_regexp_index : $i + 1;
     }
 
-    # 3) All others.
+    # 3) All others cases.
     else {
       $old_i = $i++;
       ++$oldest_regexp_index unless $handle_regexps;



More information about the Orca-checkins mailing list