View | Details | Raw Unified | Return to bug 23900
Collapse All | Expand All

(-)a/C4/Labels/Label.pm (-5 / +9 lines)
Lines 148-158 sub _get_barcode_data { Link Here
148
            next FIELD_LIST;
148
            next FIELD_LIST;
149
        }
149
        }
150
        elsif ( $f =~ /^($match_kohatable).*/ ) {
150
        elsif ( $f =~ /^($match_kohatable).*/ ) {
151
            if ($item->{$f}) {
151
            my @fields = split ' ', $f;
152
                $datastring .= $item->{$f};
152
            my @data;
153
            } else {
153
            for my $field ( @fields ) {
154
                $debug and warn sprintf("The '%s' field contains no data.", $f);
154
                if ($item->{$field}) {
155
                    push @data, $item->{$field};
156
                } else {
157
                    $debug and warn sprintf("The '%s' field contains no data.", $field);
158
                }
155
            }
159
            }
160
            $datastring .= join ' ', @data;
156
            $f = $';
161
            $f = $';
157
            next FIELD_LIST;
162
            next FIELD_LIST;
158
        }
163
        }
159
- 

Return to bug 23900