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

(-)a/misc/cronjobs/advance_notices.pl (-5 / +4 lines)
Lines 240-247 UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) { Link Here
240
        
240
        
241
        if ( $borrower_preferences->{'wants_digest'} ) {
241
        if ( $borrower_preferences->{'wants_digest'} ) {
242
            # cache this one to process after we've run through all of the items.
242
            # cache this one to process after we've run through all of the items.
243
            $due_digest->{$upcoming->{borrowernumber}}{email} = $from_address;
243
            $due_digest->{ $upcoming->{borrowernumber} }->{email} = $from_address;
244
            $due_digest->{$upcoming->{borrowernumber}}{count}++;
244
            $due_digest->{ $upcoming->{borrowernumber} }->{count}++;
245
        } else {
245
        } else {
246
            my $biblio = C4::Biblio::GetBiblioFromItemNumber( $upcoming->{'itemnumber'} );
246
            my $biblio = C4::Biblio::GetBiblioFromItemNumber( $upcoming->{'itemnumber'} );
247
            my $letter_type = 'DUE';
247
            my $letter_type = 'DUE';
Lines 274-281 UPCOMINGITEM: foreach my $upcoming ( @$upcoming_dues ) { Link Here
274
274
275
        if ( $borrower_preferences->{'wants_digest'} ) {
275
        if ( $borrower_preferences->{'wants_digest'} ) {
276
            # cache this one to process after we've run through all of the items.
276
            # cache this one to process after we've run through all of the items.
277
            $upcoming_digest->{$upcoming->{borrowernumber}}{email} = $from_address;
277
            $upcoming_digest->{ $upcoming->{borrowernumber} }->{email} = $from_address;
278
            $upcoming_digest->{$upcoming->{borrowernumber}}{count}++;
278
            $upcoming_digest->{ $upcoming->{borrowernumber} }->{count}++;
279
        } else {
279
        } else {
280
            my $biblio = C4::Biblio::GetBiblioFromItemNumber( $upcoming->{'itemnumber'} );
280
            my $biblio = C4::Biblio::GetBiblioFromItemNumber( $upcoming->{'itemnumber'} );
281
            my $letter_type = 'PREDUE';
281
            my $letter_type = 'PREDUE';
282
- 

Return to bug 13240