X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=labels%2Fspinelabel-print.pl;h=7076a08f18d37d7448d7ee11cd892f5476e35429;hb=49f8964bb29a380fae393d2946dedb567e482802;hp=d3a33cc6e40d51c5469cd1c0891dda320dba104d;hpb=56c72ab9727b4b98c988b1c9c9e25b5bd3d4d465;p=koha.git diff --git a/labels/spinelabel-print.pl b/labels/spinelabel-print.pl index d3a33cc6e4..7076a08f18 100755 --- a/labels/spinelabel-print.pl +++ b/labels/spinelabel-print.pl @@ -62,14 +62,14 @@ while ( my ( $key, $value ) = each(%$item) ) { $value = '' unless defined $value; my @characters = split( //, $value ); my $charnum = 1; - my $wordnum = 1; + my $wordernumber = 1; my $i = 1; foreach my $char (@characters) { if ( $char ne ' ' ) { - $data->{$key} .= "$char"; + $data->{$key} .= "$char"; } else { $data->{$key} .= "$char"; - $wordnum++; + $wordernumber++; $charnum = 1; } $charnum++;