Attachment 155350 Details for Bug 34732 – Bug 34732: For Code39, append or prepend asterisk if missing from barcode

[patch] Bug 34732: For Code39, append or prepend asterisk if missing from barcode

Bug-34732-For-Code39-append-or-prepend-asterisk-if.patch (text/plain), 1.53 KB, created by David Cook on 2023-09-08 02:22:03 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: David Cook

Created: 2023-09-08 02:22:03 UTC

Size: 1.53 KB

patch

obsolete

>From 76ae6b199b33e9dab610c7f0f53b12e499931172 Mon Sep 17 00:00:00 2001
>From: David Cook <dcook@prosentient.com.au>
>Date: Fri, 8 Sep 2023 02:19:20 +0000
>Subject: [PATCH] Bug 34732: For Code39, append or prepend asterisk if missing
> from barcode
>
>This patch appends or prepends an asterisk on Code39 barcodes if
>they are missing from the input. This is so that they form correct
>Code39 barcode images.
>
>Test plan:
>0. Apply the patch
>1. koha-plack --reload kohadev
>2. Go to http://localhost:8081/cgi-bin/koha/labels/barcode-print.pl
>3. Type 39999000001310 into "Barcode" and click "Show barcode"
>4. Note that the barcode text on the right includes asterisks around it
>5. Type *39999000001310 into "Barcode" and click "Show barcode"
>6. Note the same as above
>7. Type 39999000001310* into "Barcode" and click "Show barcode"
>8. Note the same as above
>9. Type *39999000001310* into "Barcode" and click "Show barcode"
>10. Note the same as above
>---
> svc/barcode | 5 +++++
> 1 file changed, 5 insertions(+)
>
>diff --git a/svc/barcode b/svc/barcode
>index bd9c8203bc..e51a29f7f6 100755
>--- a/svc/barcode
>+++ b/svc/barcode
>@@ -106,6 +106,11 @@ my $height = $input->param('height') || 50;
> my $qrcode_modulesize = $input->param('modulesize') || "5"; # 1+
> my $image;
> 
>+if ($type eq 'Code39'){
>+    $barcode = '*' . $barcode unless $barcode =~ /^\*/;
>+    $barcode = $barcode . '*' unless $barcode =~ /\*$/;
>+}
>+
> eval {
>     if( $type eq "QRcode" ){
>         $image = GD::Barcode->new('QRcode', $barcode, { Ecc => "M", ModuleSize => $qrcode_modulesize } )->plot->png();
>-- 
>2.30.2

Actions: View | Diff | Splinter Review

Attachments on bug 34732: 155281 | 155282 | 155350 | 155391 | 155708 | 155709