diff options
Diffstat (limited to '')
-rw-r--r-- | colophon/oddmuse/server.pl | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/colophon/oddmuse/server.pl b/colophon/oddmuse/server.pl new file mode 100644 index 00000000..8f117219 --- /dev/null +++ b/colophon/oddmuse/server.pl @@ -0,0 +1,55 @@ +#!/usr/bin/env perl + +# Copyright (C) 2015-2016 Alex Schroeder <alex@gnu.org> + +# This program is free software: you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation, either version 3 of the License, or (at your option) any later +# version. +# +# This program is distributed in the hope that it will be useful, but WITHOUT +# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS +# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program. If not, see <http://www.gnu.org/licenses/>. + +use Mojolicious::Lite; + +# This needs to be in a different section, sometimes? +plugin CGI => { + support_semicolon_in_query_string => 1, +}; + +plugin CGI => { + # route => '/wiki', + route => '/', + # We need this for older versions of Mojolicious::Plugin::CGI + script => 'wiki.pl', + run => \&OddMuse::DoWikiRequest, + before => sub { + no warnings; + $OddMuse::RunCGI = 0; + # The default data directory is determined by the environment variable + # WikiDataDir and falls back to the following + # $OddMuse::DataDir = '/tmp/oddmuse'; + use warnings; + require './build/wiki.pl' unless defined &OddMuse::DoWikiRequest; + }, + env => { + "OMHOME" => "/home/omec" + }, + # path to where STDERR from cgi script goes + errlog => ($ENV{WikiDataDir} || '/tmp/oddmuse') + . "/wiki.log", +}; + +#plugin SetUserGroup => {user => "omec", group => "omec"}; + +#get '/' => sub { +# my $self = shift; +# $self->redirect_to('/wiki'); +#}; + +app->plugin('Config'); +app->start; |