Lines 17-24
sub _get_help_version {
Link Here
|
17 |
} |
17 |
} |
18 |
|
18 |
|
19 |
sub _get_base_url { |
19 |
sub _get_base_url { |
|
|
20 |
my ( $preferred_language ) = @_; |
21 |
|
22 |
my @available_languages = qw( en ar cs es fr it pt_BZ tz zh_TW ); |
23 |
|
24 |
my ( $language ) = grep { |
25 |
my $preferred_short = substr $preferred_language, 0, 2; |
26 |
my $avail_short = substr $_, 0, 2; |
27 |
$preferred_short eq $avail_short ? $_ : () |
28 |
} @available_languages; |
29 |
|
30 |
my $KohaManualLanguage = $language || C4::Context->preference('KohaManualLanguage') || 'en'; |
20 |
my $KohaManualBaseURL = C4::Context->preference('KohaManualBaseURL') || 'http://koha-community.org/manual'; |
31 |
my $KohaManualBaseURL = C4::Context->preference('KohaManualBaseURL') || 'http://koha-community.org/manual'; |
21 |
my $KohaManualLanguage = C4::Context->preference('KohaManualLanguage') || 'en'; |
|
|
22 |
if ( $KohaManualBaseURL =~ m|^/| ) { |
32 |
if ( $KohaManualBaseURL =~ m|^/| ) { |
23 |
$KohaManualBaseURL = C4::Context->preference('staffClientBaseURL') . $KohaManualBaseURL; |
33 |
$KohaManualBaseURL = C4::Context->preference('staffClientBaseURL') . $KohaManualBaseURL; |
24 |
} |
34 |
} |
Lines 221-227
our $mapping = {
Link Here
|
221 |
}; |
231 |
}; |
222 |
|
232 |
|
223 |
sub get_url { |
233 |
sub get_url { |
224 |
my $url = shift; |
234 |
my ( $url, $preferred_language ) = @_; |
225 |
my $file; |
235 |
my $file; |
226 |
if ($url =~ /koha\/(.*)\.pl/) { |
236 |
if ($url =~ /koha\/(.*)\.pl/) { |
227 |
$file = $1; |
237 |
$file = $1; |
Lines 230-236
sub get_url {
Link Here
|
230 |
} |
240 |
} |
231 |
$file =~ s/[^a-zA-Z0-9_\-\/]*//g; |
241 |
$file =~ s/[^a-zA-Z0-9_\-\/]*//g; |
232 |
|
242 |
|
233 |
my $base_url = _get_base_url; |
243 |
my $base_url = _get_base_url( $preferred_language ); |
234 |
return $base_url . ( exists $mapping->{$file} ? $mapping->{$file} : $mapping->{mainpage} ); |
244 |
return $base_url . ( exists $mapping->{$file} ? $mapping->{$file} : $mapping->{mainpage} ); |
235 |
} |
245 |
} |
236 |
|
246 |
|