nginx-0.6.28

[Igor Sysoev]

On Fri, Mar 14, 2008 at 01:20:50PM +0200, Veaceslav Grecea wrote:

> On Четверг 13 марта 2008, Igor Sysoev wrote:
> > On Thu, Mar 13, 2008 at 06:11:29PM +0300, Alexander Azarov wrote:
> > > Игорь, у меня не собирается:
> > Патч.
> 
> С патчем получаю вот такую картину:
> 
> gcc -c -pipe -Wall -O2  -I /usr/include/pcre/ -I src/core -I src/event -I 
> src/event/modules -I src/os/unix -I objs -I src/http -I src/http/modules -I 
> src/http/modules/perl \
>                 -o objs/src/http/modules/ngx_http_empty_gif_module.o \
>                 src/http/modules/ngx_http_empty_gif_module.c
> src/http/modules/perl/ngx_http_perl_module.c: In 
> function 'ngx_http_perl_exit':
> src/http/modules/perl/ngx_http_perl_module.c:1061: error: 'my_perl' undeclared 
> (first use in this function)
> src/http/modules/perl/ngx_http_perl_module.c:1061: error: (Each undeclared 
> identifier is reported only once
> src/http/modules/perl/ngx_http_perl_module.c:1061: error: for each function it 
> appears in.)
> make[1]: *** [objs/src/http/modules/perl/ngx_http_perl_module.o] Error 1
> make[1]: *** Waiting for unfinished jobs....
> 
> Что у меня не так ?
> 
> Linux 2.6.18-ovz-smp
> perl version: v5.8.8 built for x86_64-linux-thread-multi
> gcc version: 4.1.1 20070105

А раньше это было ?
Ещё один патч.


-- 
Игорь Сысоев
http://sysoev.ru
-------------- next part --------------
Index: src/http/modules/perl/ngx_http_perl_module.c
===================================================================
--- src/http/modules/perl/ngx_http_perl_module.c	(revision 1260)
+++ src/http/modules/perl/ngx_http_perl_module.c	(working copy)
@@ -1055,8 +1055,20 @@
     return NGX_OK;
 }
 
+
 static void
 ngx_http_perl_exit(ngx_cycle_t *cycle)
 {
+    ngx_http_perl_main_conf_t  *pmcf;
+
+    pmcf = ngx_http_cycle_get_module_main_conf(cycle, ngx_http_perl_module);
+
+    {
+
+    dTHXa(pmcf->perl);
+    PERL_SET_CONTEXT(pmcf->perl);
+
     PERL_SYS_TERM();
+
+    }
 }