@@ -, +, @@
superlibarian emails
---
.../prog/en/includes/member-alt-address-style.inc | 4 ++++
.../prog/en/modules/members/memberentrygen.tt | 10 +++++++++-
members/memberentry.pl | 10 +++++++++-
3 files changed, 22 insertions(+), 2 deletions(-)
--- a/koha-tmpl/intranet-tmpl/prog/en/includes/member-alt-address-style.inc
+++ a/koha-tmpl/intranet-tmpl/prog/en/includes/member-alt-address-style.inc
@@ -222,7 +222,11 @@
+ [% IF ( NoUpdateEmail ) %]
+
+ [% ELSE %]
+ [% END %]
[% IF ( mandatoryB_email ) %]Required[% END %]
[% END %]
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tt
+++ a/koha-tmpl/intranet-tmpl/prog/en/modules/members/memberentrygen.tt
@@ -712,7 +712,11 @@ legend:hover {
[% END %]
Primary email:
+ [% IF ( NoUpdateEmail ) %]
+
+ [% ELSE %]
+ [% END %]
[% IF ( mandatoryemail ) %]
Required
[% END %]
@@ -729,12 +733,16 @@ legend:hover {
[% END %]
Secondary email:
+ [% IF ( NoUpdateEmail ) %]
+
+ [% ELSE %]
+ [% END %]
[% IF ( mandatoryemailpro ) %]
Required
[% END %]
- [% END # /UNLESS noemailpro %]
+ [% END #/UNLESS noemailpro %]
[% UNLESS nofax %]
--- a/members/memberentry.pl
+++ a/members/memberentry.pl
@@ -101,6 +101,7 @@ my $step = $input->param('step') || 0;
my @errors;
my $borrower_data;
my $NoUpdateLogin;
+my $NoUpdateEmail;
my $userenv = C4::Context->userenv;
my @messages;
@@ -170,6 +171,11 @@ if ( $op eq 'modify' or $op eq 'save' or $op eq 'duplicate' ) {
my $logged_in_user = Koha::Patrons->find( $loggedinuser );
output_and_exit_if_error( $input, $cookie, $template, { module => 'members', logged_in_user => $logged_in_user, current_patron => $patron } );
+ # check permission to modify email info.
+ if ( $patron->is_superlibrarian && !$logged_in_user->is_superlibrarian ) {
+ $NoUpdateEmail = 1;
+ }
+
$borrower_data = $patron->unblessed;
$borrower_data->{category_type} = $patron->category->category_type;
}
@@ -210,7 +216,8 @@ if ( $op eq 'insert' || $op eq 'modify' || $op eq 'save' || $op eq 'duplicate' )
push(@errors,"ERROR_$_");
}
}
- # check permission to modify login info.
+
+ # check permission to modify login info.
if (ref($borrower_data) && ($borrower_data->{'category_type'} eq 'S') && ! (C4::Auth::haspermission($userenv->{'id'},{'staffaccess'=>1})) ) {
$NoUpdateLogin = 1;
}
@@ -831,6 +838,7 @@ $template->param(
modify => $modify,
nok => $nok,#flag to know if an error
NoUpdateLogin => $NoUpdateLogin,
+ NoUpdateEmail => $NoUpdateEmail,
);
# Generate CSRF token
--