Lines 45-50
sub GetName {
Link Here
|
45 |
return $branchname; |
45 |
return $branchname; |
46 |
} |
46 |
} |
47 |
|
47 |
|
|
|
48 |
sub GetLoggedInBranch { |
49 |
my ($self) = @_; |
50 |
return Koha::Libraries->find( $self->GetLoggedInBranchcode ); |
51 |
} |
52 |
|
48 |
sub GetLoggedInBranchcode { |
53 |
sub GetLoggedInBranchcode { |
49 |
my ($self) = @_; |
54 |
my ($self) = @_; |
50 |
|
55 |
|
Lines 191-205
sub GetBranchSpecificCSS {
Link Here
|
191 |
return $opacusercss; |
196 |
return $opacusercss; |
192 |
} |
197 |
} |
193 |
|
198 |
|
194 |
sub get_library_color { |
|
|
195 |
my ( $self, $branchcode ) = @_; |
196 |
|
197 |
return q{} unless defined $branchcode; |
198 |
|
199 |
my $library = Koha::Libraries->find($branchcode); |
200 |
my $library_color = $library ? $library->library_color : q{}; |
201 |
|
202 |
return $library_color; |
203 |
} |
204 |
|
205 |
1; |
199 |
1; |