mirror of
https://git.FreeBSD.org/ports.git
synced 2025-02-07 11:49:40 +00:00
2922e45d0b
- No longer broken with mod_perl2 - Fixed packing list when installing in non-standard path - Added patch to Makefile.in to correctly install sample config files - Added optional patches to support multiple instances PR: ports/85910 Submitted by: Angelo Turetta <aturetta@bestunion.it>
63 lines
1.5 KiB
Plaintext
63 lines
1.5 KiB
Plaintext
Index: lib/RT.pm.in
|
|
--- rt-3.4.2-pristine/lib/RT.pm.in 2005-05-11 20:36:48.098851448 -0400
|
|
+++ rt-3.4.2/lib/RT.pm.in 2005-05-11 20:41:52.026647400 -0400
|
|
@@ -98,6 +98,60 @@
|
|
# via the web interface)
|
|
$MasonSessionDir = '@MASON_SESSION_PATH@';
|
|
|
|
+=item import
|
|
+
|
|
+Allow override of various internal paths.
|
|
+
|
|
+ RT->import (
|
|
+ RT_INSTANCE_PATH => '/usr/local/rt/stuff',
|
|
+ SITE_CONFIG_FILE => '/etc/stuff.pm',
|
|
+ ...
|
|
+ );
|
|
+
|
|
+If RT_INSTANCE_PATH is set in the arguments (or in %ENV)
|
|
+then it replaces the old value of $BasePath in the following
|
|
+variables:
|
|
+ $SITE_CONFIG_FILE
|
|
+ $LocalPath
|
|
+ $LocalEtcPath
|
|
+ $LocalLexiconPath
|
|
+ $MasonLocalComponentRoot
|
|
+ $MasonDataDir
|
|
+ $MasonSessionDir
|
|
+
|
|
+Beyond that, those individual values can be set explicitly
|
|
+by arguments.
|
|
+
|
|
+=cut
|
|
+
|
|
+sub import {
|
|
+no strict 'refs';
|
|
+ shift;
|
|
+ my %args = @_;
|
|
+ return unless ( scalar (keys %args) || $ENV{RT_INSTANCE_PATH} );
|
|
+
|
|
+ my @variables = qw (
|
|
+ SITE_CONFIG_FILE
|
|
+ LocalPath
|
|
+ LocalEtcPath
|
|
+ LocalLexiconPath
|
|
+ MasonLocalComponentRoot
|
|
+ MasonDataDir
|
|
+ MasonSessionDir
|
|
+ );
|
|
+
|
|
+ my $RT_INSTANCE_PATH = $args{RT_INSTANCE_PATH} || $ENV{RT_INSTANCE_PATH};
|
|
+ if ($RT_INSTANCE_PATH) {
|
|
+ foreach my $vref (@variables) {
|
|
+ $$vref =~ s/^\Q$BasePath\E/$RT_INSTANCE_PATH/;
|
|
+ }
|
|
+ }
|
|
+ foreach my $vref (@variables) {
|
|
+ $$vref = $args{$vref} if defined ( $args{$vref} );
|
|
+ }
|
|
+
|
|
+use strict 'refs';
|
|
+}
|
|
|