Lines 260-266
my $target_map = {
Link Here
|
260 |
'./about.pl' => 'INTRANET_CGI_DIR', |
260 |
'./about.pl' => 'INTRANET_CGI_DIR', |
261 |
'./acqui' => 'INTRANET_CGI_DIR', |
261 |
'./acqui' => 'INTRANET_CGI_DIR', |
262 |
'./admin' => 'INTRANET_CGI_DIR', |
262 |
'./admin' => 'INTRANET_CGI_DIR', |
263 |
'./api' => 'INTRANET_CGI_DIR', |
263 |
'./api' => 'API_CGI_DIR', |
264 |
'./authorities' => 'INTRANET_CGI_DIR', |
264 |
'./authorities' => 'INTRANET_CGI_DIR', |
265 |
'./basket' => 'INTRANET_CGI_DIR', |
265 |
'./basket' => 'INTRANET_CGI_DIR', |
266 |
'./C4' => 'PERL_MODULE_DIR', |
266 |
'./C4' => 'PERL_MODULE_DIR', |
Lines 1219-1224
sub get_target_directories {
Link Here
|
1219 |
my %dirmap = (); |
1219 |
my %dirmap = (); |
1220 |
my %skipdirs = (); |
1220 |
my %skipdirs = (); |
1221 |
if ($mode eq 'single') { |
1221 |
if ($mode eq 'single') { |
|
|
1222 |
$dirmap{'API_CGI_DIR'} = File::Spec->catdir(@basedir, $package, 'api'); |
1222 |
$dirmap{'INTRANET_CGI_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'cgi-bin'); |
1223 |
$dirmap{'INTRANET_CGI_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'cgi-bin'); |
1223 |
$dirmap{'INTRANET_TMPL_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs', 'intranet-tmpl'); |
1224 |
$dirmap{'INTRANET_TMPL_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs', 'intranet-tmpl'); |
1224 |
$dirmap{'INTRANET_WWW_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs'); |
1225 |
$dirmap{'INTRANET_WWW_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs'); |
Lines 1242-1247
sub get_target_directories {
Link Here
|
1242 |
$dirmap{'ZEBRA_RUN_DIR'} = File::Spec->catdir(@basedir, $package, 'var', 'run', 'zebradb'); |
1243 |
$dirmap{'ZEBRA_RUN_DIR'} = File::Spec->catdir(@basedir, $package, 'var', 'run', 'zebradb'); |
1243 |
} elsif ($mode eq 'dev') { |
1244 |
} elsif ($mode eq 'dev') { |
1244 |
my $curdir = File::Spec->rel2abs(File::Spec->curdir()); |
1245 |
my $curdir = File::Spec->rel2abs(File::Spec->curdir()); |
|
|
1246 |
$dirmap{'API_CGI_DIR'} = File::Spec->catdir($curdir, 'api'); |
1247 |
$skipdirs{'API_CGI_DIR'} = 1; |
1245 |
$dirmap{'INTRANET_CGI_DIR'} = File::Spec->catdir($curdir); |
1248 |
$dirmap{'INTRANET_CGI_DIR'} = File::Spec->catdir($curdir); |
1246 |
$skipdirs{'INTRANET_CGI_DIR'} = 1; |
1249 |
$skipdirs{'INTRANET_CGI_DIR'} = 1; |
1247 |
$dirmap{'INTRANET_TMPL_DIR'} = File::Spec->catdir($curdir, 'koha-tmpl', 'intranet-tmpl'); |
1250 |
$dirmap{'INTRANET_TMPL_DIR'} = File::Spec->catdir($curdir, 'koha-tmpl', 'intranet-tmpl'); |
Lines 1275-1280
sub get_target_directories {
Link Here
|
1275 |
$dirmap{'ZEBRA_RUN_DIR'} = File::Spec->catdir(@basedir, $package, 'var', 'run', 'zebradb'); |
1278 |
$dirmap{'ZEBRA_RUN_DIR'} = File::Spec->catdir(@basedir, $package, 'var', 'run', 'zebradb'); |
1276 |
} else { |
1279 |
} else { |
1277 |
# mode is standard, i.e., 'fhs' |
1280 |
# mode is standard, i.e., 'fhs' |
|
|
1281 |
$dirmap{'API_CGI_DIR'} = File::Spec->catdir(@basedir, $package, 'api'); |
1278 |
$dirmap{'INTRANET_CGI_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'cgi-bin'); |
1282 |
$dirmap{'INTRANET_CGI_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'cgi-bin'); |
1279 |
$dirmap{'INTRANET_TMPL_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs', 'intranet-tmpl'); |
1283 |
$dirmap{'INTRANET_TMPL_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs', 'intranet-tmpl'); |
1280 |
$dirmap{'INTRANET_WWW_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs'); |
1284 |
$dirmap{'INTRANET_WWW_DIR'} = File::Spec->catdir(@basedir, $package, 'intranet', 'htdocs'); |