|
Lines 59-67
our $mapping = {
Link Here
|
| 59 |
'acqui/orderreceive' => '/acquisitions.html#receiving-orders', |
59 |
'acqui/orderreceive' => '/acquisitions.html#receiving-orders', |
| 60 |
'acqui/parcel' => '/acquisitions.html#receiving-orders', |
60 |
'acqui/parcel' => '/acquisitions.html#receiving-orders', |
| 61 |
'acqui/parcels' => '/acquisitions.html#receiving-orders', |
61 |
'acqui/parcels' => '/acquisitions.html#receiving-orders', |
| 62 |
'acqui/supplier' => '/acquisitions.html#vendors', |
|
|
| 63 |
'acqui/uncertainprice' => '/acquisitions.html#create-a-basket', |
62 |
'acqui/uncertainprice' => '/acquisitions.html#create-a-basket', |
| 64 |
'acqui/z3950_search' => '/acquisitions.html#create-a-basket', |
63 |
'acqui/z3950_search' => '/acquisitions.html#create-a-basket', |
|
|
64 |
'acquisition/vendors' => '/acquisitions.html#vendors', |
| 65 |
'admin/additional-fields' => '/administration.html#additional-fields', |
65 |
'admin/additional-fields' => '/administration.html#additional-fields', |
| 66 |
'admin/admin-home' => '/administration.html', |
66 |
'admin/admin-home' => '/administration.html', |
| 67 |
'admin/aqbudgetperiods' => '/administration.html#budgets', |
67 |
'admin/aqbudgetperiods' => '/administration.html#budgets', |
|
Lines 314-327
our $mapping = {
Link Here
|
| 314 |
sub get_url { |
314 |
sub get_url { |
| 315 |
my ( $url, $preferred_language ) = @_; |
315 |
my ( $url, $preferred_language ) = @_; |
| 316 |
my $file; |
316 |
my $file; |
| 317 |
if ( $url =~ /koha\/(.*)\.pl/ || $url =~ '/koha/(erm.*)' || $url =~ '/koha/(preservation.*)' ) { |
317 |
if ( $url =~ /koha\/(.*)\.pl/ |
|
|
318 |
|| $url =~ '/koha/(erm.*)' |
| 319 |
|| $url =~ '/koha/(preservation.*)' |
| 320 |
|| $url =~ '/koha/(acquisition/vendors.*)' ) |
| 321 |
{ |
| 318 |
$file = $1; |
322 |
$file = $1; |
| 319 |
} else { |
323 |
} else { |
| 320 |
$file = 'mainpage'; |
324 |
$file = 'mainpage'; |
| 321 |
} |
325 |
} |
| 322 |
$file =~ s/[^a-zA-Z0-9_\-\/]*//g; |
326 |
$file =~ s/[^a-zA-Z0-9_\-\/]*//g; |
| 323 |
|
327 |
|
| 324 |
if ( $file =~ m|^erm| || $file =~ m|^preservation| ) { |
328 |
if ( $file =~ m|^erm| || $file =~ m|^preservation| || $file =~ m|^vendors| ) { |
| 325 |
$file =~ s|\d*+||g; |
329 |
$file =~ s|\d*+||g; |
| 326 |
} |
330 |
} |
| 327 |
|
331 |
|
| 328 |
- |
|
|