From d1d7bb00a3792187c8fe5a5ba3a481ee63552e09 Mon Sep 17 00:00:00 2001
From: Igor Sysoev <igor@sysoev.ru>
Date: Tue, 17 Nov 2009 10:31:39 +0000
Subject: add comment from r2716 commit message

---
 src/http/modules/perl/ngx_http_perl_module.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/http/modules/perl/ngx_http_perl_module.c')

diff --git a/src/http/modules/perl/ngx_http_perl_module.c b/src/http/modules/perl/ngx_http_perl_module.c
index eb6407e21..9cdd17551 100644
--- a/src/http/modules/perl/ngx_http_perl_module.c
+++ b/src/http/modules/perl/ngx_http_perl_module.c
@@ -1063,9 +1063,15 @@ ngx_http_perl_exit(ngx_cycle_t *cycle)
 {
 #if (NGX_HAVE_PERL_MULTIPLICITY)
 
+    /*
+     * the master exit hook is run before global pool cleanup,
+     * therefore just set flag here
+     */
+
     ngx_perl_term = 1;
 
 #else
+
     if (nginx_stash) {
         ngx_log_debug0(NGX_LOG_DEBUG_HTTP, cycle->log, 0, "perl term");
 
-- 
cgit v1.2.3