Return-Path: Delivered-To: apmail-modperl-cvs-archive@apache.org Received: (qmail 57010 invoked by uid 500); 20 Nov 2001 02:53:42 -0000 Mailing-List: contact modperl-cvs-help@apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Reply-To: dev@perl.apache.org Delivered-To: mailing list modperl-cvs@apache.org Received: (qmail 56999 invoked by uid 500); 20 Nov 2001 02:53:42 -0000 Delivered-To: apmail-modperl-2.0-cvs@apache.org Date: 20 Nov 2001 02:39:02 -0000 Message-ID: <20011120023902.75451.qmail@icarus.apache.org> From: stas@apache.org To: modperl-2.0-cvs@apache.org Subject: cvs commit: modperl-2.0/src/modules/perl modperl_config.c X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N stas 01/11/19 18:39:02 Modified: src/modules/perl modperl_config.c Log: since we have PerlAddVar, there may be multiple values. therefore s/apr_table_setn/apr_table_addn/. Submitted by: dougm Revision Changes Path 1.51 +1 -4 modperl-2.0/src/modules/perl/modperl_config.c Index: modperl_config.c =================================================================== RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_config.c,v retrieving revision 1.50 retrieving revision 1.51 diff -u -r1.50 -r1.51 --- modperl_config.c 2001/11/19 00:33:37 1.50 +++ modperl_config.c 2001/11/20 02:39:02 1.51 @@ -32,10 +32,7 @@ continue; } else { - /*XXX: should setn() be addn()for PerlSetVar? - * since we have PerlAddVar, there may be multiple values. - */ - apr_table_setn(merge, entries[i].key, entries[i].val); + apr_table_addn(merge, entries[i].key, entries[i].val); } }