Lines 75-88
if ( $action eq q{} ) {
Link Here
|
75 |
my $mandatory = GetMandatoryFields($action); |
75 |
my $mandatory = GetMandatoryFields($action); |
76 |
|
76 |
|
77 |
my @libraries = Koha::Libraries->search; |
77 |
my @libraries = Koha::Libraries->search; |
78 |
if ( my @libraries_to_display = split '\|', C4::Context->preference('PatronSelfRegistrationLibraryList') ) { |
78 |
if ( $action eq 'new' |
79 |
if ( $action eq 'new' ) { |
79 |
&& ( my @libraries_to_display = split '\|', C4::Context->preference('PatronSelfRegistrationLibraryList') ) |
80 |
@libraries = map { |
80 |
) { |
81 |
my $b = $_; |
81 |
@libraries = map { |
82 |
my $branchcode = $_->branchcode; |
82 |
my $b = $_; |
83 |
( grep { $_ eq $branchcode } @libraries_to_display ) ? $b : () |
83 |
my $branchcode = $_->branchcode; |
84 |
} @libraries; |
84 |
( grep { $_ eq $branchcode } @libraries_to_display ) ? $b : () |
85 |
} |
85 |
} @libraries; |
86 |
} |
86 |
} |
87 |
my ( $min, $max ) = C4::Members::get_cardnumber_length(); |
87 |
my ( $min, $max ) = C4::Members::get_cardnumber_length(); |
88 |
if ( defined $min ) { |
88 |
if ( defined $min ) { |
89 |
- |
|
|