Project Aon Git Repositories
/
project-aon.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
b571a45
)
Output UTF-8; handle empty lines
author
Jonathan Blake
<jonathan.blake@projectaon.org>
Sat, 7 Sep 2019 23:04:49 +0000
(16:04 -0700)
committer
Jonathan Blake
<jonathan.blake@projectaon.org>
Sat, 7 Sep 2019 23:04:49 +0000
(16:04 -0700)
common/scripts/xmlize.pl
patch
|
blob
|
history
diff --git
a/common/scripts/xmlize.pl
b/common/scripts/xmlize.pl
index
349d37d
..
063bd05
100755
(executable)
--- a/
common/scripts/xmlize.pl
+++ b/
common/scripts/xmlize.pl
@@
-8,6
+8,7
@@
use strict;
use warnings;
use utf8;
use open ':encoding(UTF-8)';
+use open ':std', ':encoding(UTF-8)';
my $FILE_EXTENSION = 'txt';
my $BASE_INDENT = ' ';
@@
-121,6
+122,10
@@
print << "(End of XML footer)";
sub xmlize {
my( $inline, $infile ) = @_;
+ if(!defined $inline || $inline eq "") {
+ return "";
+ }
+
$inline =~ tr/\t/ /;
$inline =~ s/[[:space:]]{2,}/ /g;
$inline =~ s/[[:space:]]+$//;