diff options
Diffstat (limited to 'rt/bin/mason_handler.scgi')
-rwxr-xr-x | rt/bin/mason_handler.scgi | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/rt/bin/mason_handler.scgi b/rt/bin/mason_handler.scgi new file mode 100755 index 0000000..7774189 --- /dev/null +++ b/rt/bin/mason_handler.scgi @@ -0,0 +1,43 @@ +#!/usr/local/bin/speedy +# BEGIN LICENSE BLOCK +# +# Copyright (c) 1996-2003 Jesse Vincent <jesse@bestpractical.com> +# +# (Except where explictly superceded by other copyright notices) +# +# This work is made available to you under the terms of Version 2 of +# the GNU General Public License. A copy of that license should have +# been provided with this software, but in any event can be snarfed +# from www.gnu.org. +# +# This work 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. +# +# Unless otherwise specified, all modifications, corrections or +# extensions to this work which alter its source code become the +# property of Best Practical Solutions, LLC when submitted for +# inclusion in the work. +# +# +# END LICENSE BLOCK + +use strict; +require ('/opt/rt3/bin/webmux.pl'); + +my $h = &RT::Interface::Web::NewCGIHandler(@RT::MasonParameters); + +require CGI; + +RT::Init(); + +my $cgi = CGI->new; +if ( ( !$h->interp->comp_exists( $cgi->path_info ) ) + && ( $h->interp->comp_exists( $cgi->path_info . "/index.html" ) ) ) { + $cgi->path_info( $cgi->path_info . "/index.html" ); +} + +$h->handle_cgi_object($cgi); + +1; |