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

(-)a/C4/Labels/Label.pm (-1 / +12 lines)
Lines 579-584 sub barcode { Link Here
579
        my $adjusted_llx  = $params{'llx'};
579
        my $adjusted_llx  = $params{'llx'};
580
        my $barcode_width = $tot_bar_length * $x_scale_factor;
580
        my $barcode_width = $tot_bar_length * $x_scale_factor;
581
581
582
        if ( $barcode_justify eq 'C' ) {
583
            $adjusted_llx = $params{'llx'} + ( ( $self->{'width'} - $barcode_width ) / 2 );
584
        } elsif ( $barcode_justify eq 'R' ) {
585
            $adjusted_llx = $params{'llx'} + ( $self->{'width'} - $barcode_width );
586
        }
587
582
        eval {
588
        eval {
583
            PDF::Reuse::Barcode::COOP2of5(
589
            PDF::Reuse::Barcode::COOP2of5(
584
                x     => $adjusted_llx,
590
                x     => $adjusted_llx,
Lines 600-605 sub barcode { Link Here
600
        my $adjusted_llx  = $params{'llx'};
606
        my $adjusted_llx  = $params{'llx'};
601
        my $barcode_width = $tot_bar_length * $x_scale_factor;
607
        my $barcode_width = $tot_bar_length * $x_scale_factor;
602
608
609
        if ( $barcode_justify eq 'C' ) {
610
            $adjusted_llx = $params{'llx'} + ( ( $self->{'width'} - $barcode_width ) / 2 );
611
        } elsif ( $barcode_justify eq 'R' ) {
612
            $adjusted_llx = $params{'llx'} + ( $self->{'width'} - $barcode_width );
613
        }
614
603
        eval {
615
        eval {
604
            PDF::Reuse::Barcode::Industrial2of5(
616
            PDF::Reuse::Barcode::Industrial2of5(
605
                x     => $adjusted_llx,
617
                x     => $adjusted_llx,
606
- 

Return to bug 40478