|
Lines 62-67
my (@errors, @feedback);
Link Here
|
| 62 |
my $extended = C4::Context->preference('ExtendedPatronAttributes'); |
62 |
my $extended = C4::Context->preference('ExtendedPatronAttributes'); |
| 63 |
my $set_messaging_prefs = C4::Context->preference('EnhancedMessagingPreferences'); |
63 |
my $set_messaging_prefs = C4::Context->preference('EnhancedMessagingPreferences'); |
| 64 |
my @columnkeys = C4::Members::columns(); |
64 |
my @columnkeys = C4::Members::columns(); |
|
|
65 |
if ($extended) { |
| 66 |
push @columnkeys, 'patron_attributes'; |
| 67 |
} |
| 65 |
|
68 |
|
| 66 |
my $input = CGI->new(); |
69 |
my $input = CGI->new(); |
| 67 |
our $csv = Text::CSV->new({binary => 1}); # binary needed for non-ASCII Unicode |
70 |
our $csv = Text::CSV->new({binary => 1}); # binary needed for non-ASCII Unicode |
| 68 |
- |
|
|