perl update

This commit is contained in:
Anthony Minessale
2012-05-23 11:31:17 -05:00
parent bb3f72cb66
commit 4b2e7fc1f2
9 changed files with 238 additions and 76 deletions

View File

@@ -4,7 +4,7 @@ static void callback(scgi_socket_t server_sock, scgi_socket_t *client_sock, stru
{
scgi_handle_t handle = { 0 };
if (scgi_parse(client_sock, &handle) == SCGI_SUCCESS) {
if (scgi_parse(*client_sock, &handle) == SCGI_SUCCESS) {
scgi_param_t *pp;
*client_sock = SCGI_SOCK_INVALID;