fix to remove blank newlines from labels

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>

diff --git a/C4/Labels.pm b/C4/Labels.pm
index 827ce91..14d3227 100644 (file)
--- a/C4/Labels.pm
+++ b/C4/Labels.pm
@@ -1077,6 +1077,7 @@ sub DrawSpineText {
             # loop for each string line
             foreach my $str (@strings) {
                 my $hPos = $x_pos;
+                next if $str eq '';
                 my $stringwidth = prStrWidth($str, $fontname, $fontsize);
                 if ( $$conf_data->{'text_justify'} eq 'R' ) { 
                     $hPos += $label_width - ($left_text_margin + $stringwidth);