/[webpac]/trunk/all2xml.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/all2xml.pl

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

revision 109 by dpavlin, Mon Jul 14 18:50:39 2003 UTC revision 136 by dpavlin, Wed Oct 29 22:46:49 2003 UTC
# Line 160  sub data2xml { Line 160  sub data2xml {
160                                          }                                          }
161                                          if ($filter) {                                          if ($filter) {
162                                                  no strict 'refs';                                                  no strict 'refs';
163                                                  $display_data .= join($delimiter,&$filter($display));                                                  $display_data .= $delimiter.&$filter($display);
164                                          } else {                                          } else {
165                                                  if ($display_data) {                                                  $display_data .= $delimiter.$display;
                                                         $display_data .= $delimiter.$display;  
                                                 } else {  
                                                         $display_data .= $display;  
                                                 }  
166                                          }                                          }
167                                  }                                  }
168                                                                                                    
# Line 181  sub data2xml { Line 177  sub data2xml {
177                          if (@index_data) {                          if (@index_data) {
178                                  if ($index_filter) {                                  if ($index_filter) {
179                                          no strict 'refs';                                          no strict 'refs';
180                                          foreach my $d (&$index_filter(@index_data)) {                                          foreach my $d (@index_data) {
181                                                  $index->insert($field, $d, $path);                                                  $index->insert($field, &$index_filter($d), $path);
182                                          }                                          }
183                                  } else {                                  } else {
184                                          foreach my $d (@index_data) {                                          foreach my $d (@index_data) {

Legend:
Removed from v.109  
changed lines
  Added in v.136

  ViewVC Help
Powered by ViewVC 1.1.26