| commit | 6e2b125d4d5f390f1fa2ef5da75a2a5d0764051c | [log] [tgz] |
|---|---|---|
| author | Akron <nils@diewald-online.de> | Wed Feb 24 12:41:15 2021 +0100 |
| committer | Akron <nils@diewald-online.de> | Wed Feb 24 13:20:06 2021 +0100 |
| tree | ea40f12cd6100eef381a7514e213884f0eeadd11 | |
| parent | cc27d79d071dd733d895f0fe79c10b922148f2bb [diff] |
Improve whitespace padding Change-Id: Ibd2c49ddaa89f2b4f45d502487f0f3af4d0d8901
diff --git a/script/tei2korapxml b/script/tei2korapxml index c18f941..6e44f95 100755 --- a/script/tei2korapxml +++ b/script/tei2korapxml
@@ -367,8 +367,8 @@ $text_line++; # insert blank before 1st character - #(for 2nd line and consecutive lines) - s/^(.)/ $1/ if $text_line > 1; + # (for 2nd line and consecutive lines) + $_ = ' ' . $_ if $text_line > 1; } # add line to buffer