|
Lines 318-326
sub get_url {
Link Here
|
| 318 |
my ( $url, $preferred_language ) = @_; |
318 |
my ( $url, $preferred_language ) = @_; |
| 319 |
my $file; |
319 |
my $file; |
| 320 |
if ( $url =~ /koha\/(.*)\.pl/ |
320 |
if ( $url =~ /koha\/(.*)\.pl/ |
| 321 |
|| $url =~ '/koha/(erm.*)' |
321 |
|| $url =~ '/koha/(erm[^?]*)' |
| 322 |
|| $url =~ '/koha/(preservation.*)' |
322 |
|| $url =~ '/koha/(preservation[^?]*)' |
| 323 |
|| $url =~ '/koha/(acquisition/vendors.*)' ) |
323 |
|| $url =~ '/koha/(acquisition/vendors[^?]*)' ) |
| 324 |
{ |
324 |
{ |
| 325 |
$file = $1; |
325 |
$file = $1; |
| 326 |
} else { |
326 |
} else { |
| 327 |
- |
|
|