From 06d757469d10301c723f3f2ace712196c115094a Mon Sep 17 00:00:00 2001
From: Jonathan Blake <jonathan.blake@projectaon.org>
Date: Thu, 18 Jul 2019 19:09:49 -0700
Subject: [PATCH] Fix XMLize script format

---
 common/scripts/xmlize.pl | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/common/scripts/xmlize.pl b/common/scripts/xmlize.pl
index 23f2066..277ceb0 100755
--- a/common/scripts/xmlize.pl
+++ b/common/scripts/xmlize.pl
@@ -83,17 +83,17 @@ for( my $sectionNumber = $minSectionNumber; $sectionNumber <= $numberOfSections;
 
     foreach my $oldline (@oldlines) {
         $oldline =~ s/\r|\n/ /g;
-	$oldline =~ s/^\s*(\S*)\s*$/$1/;
-	$oldline =~ s/\s\s/ /;
-	if( $oldline ne "" ) {
-	    $newline .= (" " . $oldline);
-	}
-	else {
-            $newline = &xmlize( $newline, $infile );
-            $newline .= "\n" if( $newline ne "" );
-	    push( @newlines, $newline );
-            $newline = "";
-	}
+        $oldline =~ s/^\s*(\S*)\s*$/$1/;
+        $oldline =~ s/\s{2,}/ /;
+        if( $oldline ne "" ) {
+            $newline .= (" " . $oldline);
+        }
+        else {
+                $newline = &xmlize($newline, $infile);
+                $newline .= "\n" if($newline ne "");
+                push( @newlines, $newline );
+                $newline = "";
+        }
     }
 
     print "\n\n    <section class=\"numbered\" id=\"sect$sectionNumber\">\n     <meta><title>$sectionNumber</title></meta>\n\n     <data>\n";
-- 
2.17.1