);
BEGIN {
-# my $null = $0; $null =~ s/\\/\//g; # for win :-(
-# $Bin = ($null =~ /^(.*)\/.*$/)? $1 : '.';
-# $Shared = "$Bin/../shared";
-# $Config = "$Bin/config";
-# $Script = ($null =~ /^.*\/(.*)$/)? $1 : $null;
-
- my $null = $0; #$null =~ s/\\/\//g; # for win :-(
+ my $null = $0; $null =~ s/\\/\//g; # for win :-(
$Bin = ($null =~ /^(.*)\/.*$/)? $1 : '.';
- $Config = "$Bin/../../../cgi-config/devforum";
- $Shared = "$Bin/../../../cgi-shared";
+ $Shared = "$Bin/../shared";
+ $Config = "$Bin/config";
$Script = ($null =~ /^.*\/(.*)$/)? $1 : $null;
+
+# my $null = $0; #$null =~ s/\\/\//g; # for win :-(
+# $Bin = ($null =~ /^(.*)\/.*$/)? $1 : '.';
+# $Config = "$Bin/../../../cgi-config/devforum";
+# $Shared = "$Bin/../../../cgi-shared";
+# $Script = ($null =~ /^.*\/(.*)$/)? $1 : $null;
}
use lib "$Shared";
cgi => $cgi,
tree => $tree,
firsttime => 1,
- cachefile => $conf -> {files} -> {cacheFile}
+ cachepath => $conf -> {files} -> {cachePath}
}
);
}