From 3d8dc32afa0131e2ac0cd121b492aed8ad59fc11 Mon Sep 17 00:00:00 2001
From: Dylan William Hardison <dylan@hardison.net>
Date: Mon, 21 May 2018 14:14:53 -0400
Subject: working more

---
 Bugzilla/PSGI.pm | 43 -------------------------------------------
 1 file changed, 43 deletions(-)
 delete mode 100644 Bugzilla/PSGI.pm

(limited to 'Bugzilla/PSGI.pm')

diff --git a/Bugzilla/PSGI.pm b/Bugzilla/PSGI.pm
deleted file mode 100644
index e2963ff7a..000000000
--- a/Bugzilla/PSGI.pm
+++ /dev/null
@@ -1,43 +0,0 @@
-# This Source Code Form is subject to the terms of the Mozilla Public
-# License, v. 2.0. If a copy of the MPL was not distributed with this
-# file, You can obtain one at http://mozilla.org/MPL/2.0/.
-#
-# This Source Code Form is "Incompatible With Secondary Licenses", as
-# defined by the Mozilla Public License, v. 2.0.
-
-package Bugzilla::PSGI;
-use 5.10.1;
-use strict;
-use warnings;
-
-use base qw(Exporter);
-
-use Bugzilla::Logging;
-our @EXPORT_OK = qw(compile_cgi);
-
-sub compile_cgi {
-    my ($script) = @_;
-    require CGI::Compile;
-    require CGI::Emulate::PSGI;
-
-    my $cgi = CGI::Compile->compile($script);
-    my $app = CGI::Emulate::PSGI->handler(
-        sub {
-            Bugzilla::init_page();
-            $ENV{PATH_INFO} = '' if $ENV{PATH_INFO} eq '/';
-            $cgi->();
-        }
-    );
-    return sub {
-        my $env = shift;
-        if ($env->{'psgix.cleanup'}) {
-            push @{ $env->{'psgix.cleanup.handler'} }, \&Bugzilla::_cleanup;
-        }
-        my $res = $app->($env);
-        Bugzilla::_cleanup() if not $env->{'psgix.cleanup'};
-        return $res;
-    };
-}
-
-
-1;
-- 
cgit v1.2.3-24-g4f1b