[Koha-patches] [PATCH 21/55] [MT2035] Fixes leading zeroes in Add Mulpiple Copies
Henri-Damien LAURENT
henridamien.laurent at biblibre.com
Wed Mar 10 22:26:03 CET 2010
From: Jean-André Santoni <jeanandre.santoni at biblibre.com>
I don't know why, but removing sprintf solves the problems with leading zeroes and the problems with large values.
Signed-off-by: Henri-Damien LAURENT <henridamien.laurent at biblibre.com>
---
C4/Barcodes.pm | 9 +++------
1 files changed, 3 insertions(+), 6 deletions(-)
diff --git a/C4/Barcodes.pm b/C4/Barcodes.pm
index 69808e3..cc9d55a 100644
--- a/C4/Barcodes.pm
+++ b/C4/Barcodes.pm
@@ -135,14 +135,11 @@ sub next_value ($;$) {
# Note, this enlargement might be undesireable for some barcode formats.
# Those should override next_value() to work accordingly.
$incr++;
- my $width = $self->width || undef;
- # we would want to use %$x.$xd, but that would break on large values, like 2160700004168
- # so we let the object tell us if it has a width to focus on. If not, we use float.
- my $format = ($width ? '%'."$width.$width".'d' : '%.0f');
- $debug and warn "sprintf(\"$format\",$incr)";
+
+ $debug and warn "$incr";
$head = $self->process_head($head,$max,$specific);
$tail = $self->process_tail($tail,$max,$specific);
- my $next_value = $head . sprintf($format,$incr) . $tail;
+ my $next_value = $head . $incr . $tail;
$debug and print STDERR "( next ) max barcode found: $next_value\n";
return $next_value;
}
--
1.6.3.3
More information about the Koha-patches
mailing list