|
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; |