[Koha-cvs] koha/barcodes label-manager.pl

[Mason James]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         
Changes by:     Mason James <address@hidden>    06/04/19 04:51:03

Modified files:
        barcodes       : label-manager.pl 

Log message:
        Small fix, 'labels remaining' now works.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/barcodes/label-manager.pl.diff?tr1=1.2&tr2=1.3&r1=text&r2=text

Patches:
Index: koha/barcodes/label-manager.pl
diff -u koha/barcodes/label-manager.pl:1.2 koha/barcodes/label-manager.pl:1.3
--- koha/barcodes/label-manager.pl:1.2  Tue Apr 11 20:56:14 2006
+++ koha/barcodes/label-manager.pl      Wed Apr 19 04:51:03 2006
@@ -122,13 +122,19 @@
 
 #calc-ing number of sheets
 my $number_of_results = scalar @resultsloop;
-my $sheets_needed = ( ( $number_of_results + $startrow ) / 8 );
-$sheets_needed = ceil($sheets_needed);    # rounding up int's
+my $sheets_needed = ( ( --$number_of_results + $startrow ) / 8 );
+        $sheets_needed = ceil($sheets_needed);    # rounding up int's
+
+my $tot_labels = ($sheets_needed * 8);
+my $start_results =  ($number_of_results + $startrow);
+my $labels_remaining = ($tot_labels - $start_results);
 
 $template->param(
     resultsloop             => address@hidden,
     startrow                => $startrow,
     sheets                  => $sheets_needed,
+    labels_remaining        => $labels_remaining,
+
     intranetcolorstylesheet =>
       C4::Context->preference("intranetcolorstylesheet"),
     intranetstylesheet => C4::Context->preference("intranetstylesheet"),