# The default web locale.
our $lang = "en_US.UTF-8";
+# The base path for all web stuff.
+our $webroot = "http://ccbs.sesse.net/";
+
# Set this flag to enable debugging of all SQL statements.
our $dbdebug = 0;
my $location = shift;
print CGI::header(-status=>'303 See other',
- -location=>'http://ccbs.sesse.net/' . $location,
+ -location=>$ccbs::config::webroot . $location,
-type=>'text/html; charset=utf-8');
}
my $cookie = new CGI::Cookie(-name=>'language', -value=>($cgi->param('lang')));
print CGI::header(-status=>'303 See other',
- -location=>'http://ccbs.sesse.net/',
+ -location=>$ccbs::config::webroot,
-cookie=>$cookie,
-type=>'text/html; charset=utf-8');