@@ -, +, @@
---
installer/data/mysql/atomicupdate/bug_29046.pl | 16 ++++++++++++++++
installer/data/mysql/mandatory/sysprefs.sql | 1 +
.../en/modules/admin/preferences/patrons.pref | 6 ++++++
3 files changed, 23 insertions(+)
create mode 100755 installer/data/mysql/atomicupdate/bug_29046.pl
--- a/installer/data/mysql/atomicupdate/bug_29046.pl
+++ a/installer/data/mysql/atomicupdate/bug_29046.pl
@@ -0,0 +1,16 @@
+use Modern::Perl;
+
+return {
+ bug_number => "29046",
+ description => "Allow setting first_valid_email_address field precedence order",
+ up => sub {
+ my ($args) = @_;
+ my ($dbh, $out) = @$args{qw(dbh out)};
+
+ $dbh->do(q{
+ INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
+ ('EmailFieldPrecedence', 'email|emailpro|B_email', NULL, 'Ordered list of patron email fields to use when AutoEmailPrimaryAddress is set to first valid', 'multi')
+ });
+ say $out "Added new system preference 'EmailFieldPrecedence'";
+ },
+};
--- a/installer/data/mysql/mandatory/sysprefs.sql
+++ a/installer/data/mysql/mandatory/sysprefs.sql
@@ -211,6 +211,7 @@ INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `
('ElasticsearchCrossFields', '1', '', 'Enable "cross_fields" option for searches using Elastic search.', 'YesNo'),
('EmailAddressForPatronRegistrations', '', '', ' If you choose EmailAddressForPatronRegistrations you have to enter a valid email address: ', 'free'),
('EmailAddressForSuggestions','','',' If you choose EmailAddressForSuggestions you have to enter a valid email address: ','free'),
+('EmailFieldPrecedence','email|emailpro|B_email','','Ordered list of patron email fields to use when AutoEmailPrimaryAddress is set to first valid','multiple'),
('EmailFieldPrimary','OFF','email|emailpro|B_email|cardnumber|OFF','Defines the default email address field where patron email notices are sent.','Choice'),
('emailLibrarianWhenHoldIsPlaced','0',NULL,'If ON, emails the librarian whenever a hold is placed','YesNo'),
('EmailOverduesNoEmail','1',NULL,'Send send overdues of patrons without email address to staff','YesNo'),
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/patrons.pref
+++ a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/patrons.pref
@@ -183,6 +183,12 @@ Patrons:
cardnumber: cardnumber
"OFF": first valid email address
- 'for sending out email notices.'
+ -
+ - Use the following patron email fields in order of highest precedence first
+ - pref: EmailFieldPrecedence
+ class: multi
+ - when selecting which email address to use to send patron notices.
+ - '
NOTE: This preference only takes effect if AutoEmailPrimaryAddress is set to first valid'
-
- pref: TalkingTechItivaPhoneNotification
choices:
--