important bug fix for bug introduced in 1.57: it might eat your data

[webpac] / all2xml.pl

diff --git a/all2xml.pl b/all2xml.pl
index 976136e..3588f1c 100755 (executable)
--- a/all2xml.pl
+++ b/all2xml.pl
@@ -321,7 +321,7 @@ sub data2xml {
                                        } else {
                                                $display_data .= $ldel if ($display_data);
                                                my $tmp = mkformat($x,$display);
-                                               $display_data = $tmp if ($tmp);
+                                               $display_data .= $tmp if ($tmp);
                                        }
                                }