/[webpac]/branches/ffzg/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 /branches/ffzg/all2xml.pl

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

revision 195 by dpavlin, Sun Dec 14 20:50:03 2003 UTC revision 196 by dpavlin, Mon Dec 15 00:12:16 2003 UTC
# Line 282  sub data2xml { Line 282  sub data2xml {
282                                                  no strict 'refs';                                                  no strict 'refs';
283                                                  my $tmp = join(" ",&$filter($swish)) if ($s || $se);                                                  my $tmp = join(" ",&$filter($swish)) if ($s || $se);
284                                                  $swish_data .= $tmp if ($s);                                                  $swish_data .= $tmp if ($s);
285                                                  $swish_exact_data .= $tmp if ($se);                                                  if ($se) {
286                                                            if ($swish_exact_data) {
287                                                                    $swish_exact_data .= "xxexx xxbxx ".$tmp;
288                                                            } else {
289                                                                    $swish_exact_data .= $tmp;
290                                                            }
291                                                    }
292    
293                                          } else {                                          } else {
294                                                  $swish_data .= $swish if ($s);                                                  $swish_data .= $swish if ($s);
295                                                  $swish_exact_data .= $swish if ($se);                                                  if ($se) {
296                                                            if ($swish_exact_data) {
297                                                                    $swish_exact_data .= "xxexx xxbxx ".$swish;
298                                                            } else {
299                                                                    $swish_exact_data .= $swish;
300                                                            }
301                                                    }
302                                          }                                          }
303                                  }                                  }
304    

Legend:
Removed from v.195  
changed lines
  Added in v.196

  ViewVC Help
Powered by ViewVC 1.1.26