|
@@ -181,7 +181,7 @@ sub parsecdata {
|
|
|
$index=''; $cf=''; $paraborder=1;
|
|
$index=''; $cf=''; $paraborder=1;
|
|
|
while (<CDATA>) {
|
|
while (<CDATA>) {
|
|
|
s/\s*\n$//;
|
|
s/\s*\n$//;
|
|
|
- if (m/^$/) and $paraborder) next;
|
|
|
|
|
|
|
+ if (m/^$/ and $paraborder) next;
|
|
|
$paraborder=0;
|
|
$paraborder=0;
|
|
|
if (m/^(\S+)\s*:\s*(.*)$/) {
|
|
if (m/^(\S+)\s*:\s*(.*)$/) {
|
|
|
$cf=$1; $v=$2;
|
|
$cf=$1; $v=$2;
|