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

(-)a/tools/letter.pl (-8 / +7 lines)
Lines 46-52 use C4::Auth; Link Here
46
use C4::Context;
46
use C4::Context;
47
use C4::Output;
47
use C4::Output;
48
use C4::Letters;
48
use C4::Letters;
49
use C4::Members::Attributes;
49
50
use Koha::Patron::Attribute::Types;
50
51
51
# $protected_letters = protected_letters()
52
# $protected_letters = protected_letters()
52
# - return a hashref of letter_codes representing letters that should never be deleted
53
# - return a hashref of letter_codes representing letters that should never be deleted
Lines 462-473 sub get_columns_for { Link Here
462
        }
463
        }
463
    }
464
    }
464
    if ($table eq 'borrowers') {
465
    if ($table eq 'borrowers') {
465
        if ( my $attributes = C4::Members::Attributes::GetAttributes() ) {
466
        my $attribute_types = Koha::Patron::Attribute::Types->search;
466
            foreach (@$attributes) {
467
        while ( my $at = $attribute_types->next ) {
467
                push @fields, {
468
            push @fields, {
468
                    value => "borrower-attribute:$_",
469
                value => "borrower-attribute:" . $at->code,
469
                    text  => "attribute:$_",
470
                text  => "attribute:" . $at->code,
470
                }
471
            }
471
            }
472
        }
472
        }
473
    }
473
    }
474
- 

Return to bug 20444