GSP/GSP-Agent-Linux
1
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

cleanup

Browse source
This commit is contained in:
Frank Harris 2026-07-02 18:12:10 -05:00
parent 3d93d01cd1
commit 7665d702a2
22 changed files with 97 additions and 132 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Frontier/Daemon/OGP/Forking.pm → Frontier/Daemon/GSP/Forking.pm
View file

@ -1,4 +1,4 @@
package Frontier::Daemon::OGP::Forking;
package Frontier::Daemon::GSP::Forking;
# $Id: Forking.pm,v 1.6 2004/01/23 19:48:33 tcaine Exp $
use strict;
@ -14,7 +14,7 @@ use HTTP::Status;
# most of this routine comes directly from Frontier::Daemon
sub new {
my $class = shift;
my $class = shift;
my %args = @_;
my $encoding = delete $args{encoding};
my $self = $class->SUPER::new( %args );
@ -39,14 +39,14 @@ ACCEPT:
if ( not defined $pid ) {
warn "fork() failed: $!";
$conn = undef;
}
}
else {
my $request = $conn->get_request;
if ($request) {
if ($request->method eq 'POST' && $request->url->path eq '/RPC2') {
${*$self}{'response'}->content(
${*$self}{'decode'}->serve(
$request->content,
$request->content,
${*$self}{'methods'},
)
);