summaryrefslogtreecommitdiff
path: root/rt/bin/mason_handler.scgi
diff options
context:
space:
mode:
Diffstat (limited to 'rt/bin/mason_handler.scgi')
-rwxr-xr-xrt/bin/mason_handler.scgi43
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;