changeset 874:98afa13ea7e5

add comment
author Igor Sysoev <igor@sysoev.ru>
date Sun, 26 Nov 2006 16:56:41 +0000
parents f92ad15c2db1
children 7af8276b1c2f
files src/http/modules/perl/ngx_http_perl_module.c
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/http/modules/perl/ngx_http_perl_module.c	Sun Nov 26 15:35:02 2006 +0000
+++ b/src/http/modules/perl/ngx_http_perl_module.c	Sun Nov 26 16:56:41 2006 +0000
@@ -694,6 +694,9 @@
 
     if (ngx_strncmp(p, "sub ", 4) == 0 || ngx_strncmp(p, "use ", 4) == 0) {
         *sv = eval_pv((char *) p, FALSE);
+
+        /* eval_pv() does not set ERRSV on failure */
+
         return;
     }