|
Revision 621, 358 bytes
(checked in by dom, 4 years ago)
|
|
Use environment variable OPENGUIDES_CONFIG_FILE for config file location;
will be useful for mod_perl. Also add error checking to OpenGuides::Config
config file opening.
|
-
Property svn:eol-style set to
native
-
Property svn:executable set to
*
-
Property svn:keywords set to
Author Date Id Revision
|
| Line | |
|---|
| 1 | |
|---|
| 2 | |
|---|
| 3 | use warnings; |
|---|
| 4 | use strict; |
|---|
| 5 | |
|---|
| 6 | use CGI; |
|---|
| 7 | use OpenGuides::Config; |
|---|
| 8 | use OpenGuides::SuperSearch; |
|---|
| 9 | |
|---|
| 10 | my $config_file = $ENV{OPENGUIDES_CONFIG_FILE} || "wiki.conf"; |
|---|
| 11 | my $config = OpenGuides::Config->new( file => $config_file ); |
|---|
| 12 | my $search = OpenGuides::SuperSearch->new( config => $config ); |
|---|
| 13 | my %vars = CGI::Vars(); |
|---|
| 14 | $search->run( vars => \%vars ); |
|---|
