Commit e54e0727 authored by sikeda's avatar sikeda
Browse files

[svn] Retrieving recent modifications from sympa-6.1-branch (#1 / 5).


git-svn-id: https://subversion.renater.fr/sympa/branches/sympa-6.2-branch@10130 05aa8bb8-cd2b-0410-b1d7-8918dfa770ce
parent 43fb1620
......@@ -2,8 +2,8 @@
SYMPA - Systeme de multipostage automatique
Copyright 1997,1998,1999,2000,2001 Comite Reseau des Universites
Copyright 1997,1998,1999 Institut Pasteur & Christophe Wolfhugel
Copyright © 1997,1998,1999,2000,2001 Comite Reseau des Universites
Copyright © 1997,1998,1999 Institut Pasteur & Christophe Wolfhugel
You may distribute under the terms of the GNU General
......
GNU GENERAL PUBLIC LICENSE
Version 2, June 1991
GNU GENERAL PUBLIC LICENSE
Version 2, June 1991
Copyright (C) 1989, 1991 Free Software Foundation, Inc.
59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
Preamble
Preamble
The licenses for most software are designed to take away your
freedom to share and change it. By contrast, the GNU General Public
......@@ -15,7 +15,7 @@ software--to make sure the software is free for all its users. This
General Public License applies to most of the Free Software
Foundation's software and to any other program whose authors commit to
using it. (Some other Free Software Foundation software is covered by
the GNU Library General Public License instead.) You can apply it to
the GNU Lesser General Public License instead.) You can apply it to
your programs, too.
When we speak of free software, we are referring to freedom, not
......@@ -55,8 +55,8 @@ patent must be licensed for everyone's free use or not licensed at all.
The precise terms and conditions for copying, distribution and
modification follow.
GNU GENERAL PUBLIC LICENSE
GNU GENERAL PUBLIC LICENSE
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
0. This License applies to any program or other work which contains
......@@ -110,7 +110,7 @@ above, provided that you also meet all of these conditions:
License. (Exception: if the Program itself is interactive but
does not normally print such an announcement, your work based on
the Program is not required to print an announcement.)
These requirements apply to the modified work as a whole. If
identifiable sections of that work are not derived from the Program,
and can be reasonably considered independent and separate works in
......@@ -168,7 +168,7 @@ access to copy from a designated place, then offering equivalent
access to copy the source code from the same place counts as
distribution of the source code, even though third parties are not
compelled to copy the source along with the object code.
4. You may not copy, modify, sublicense, or distribute the Program
except as expressly provided under this License. Any attempt
otherwise to copy, modify, sublicense or distribute the Program is
......@@ -225,7 +225,7 @@ impose that choice.
This section is intended to make thoroughly clear what is believed to
be a consequence of the rest of this License.
8. If the distribution and/or use of the Program is restricted in
certain countries either by patents or by copyrighted interfaces, the
original copyright holder who places the Program under this License
......@@ -255,7 +255,7 @@ make exceptions for this. Our decision will be guided by the two goals
of preserving the free status of all derivatives of our free software and
of promoting the sharing and reuse of software generally.
NO WARRANTY
NO WARRANTY
11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
......@@ -277,9 +277,9 @@ YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.
END OF TERMS AND CONDITIONS
How to Apply These Terms to Your New Programs
END OF TERMS AND CONDITIONS
How to Apply These Terms to Your New Programs
If you develop a new program, and you want it to be of the greatest
possible use to the public, the best way to achieve this is to make it
......@@ -303,17 +303,16 @@ the "copyright" line and a pointer to where the full notice is found.
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
You should have received a copy of the GNU General Public License along
with this program; if not, write to the Free Software Foundation, Inc.,
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
Also add information on how to contact you by electronic and paper mail.
If the program is interactive, make it output a short notice like this
when it starts in an interactive mode:
Gnomovision version 69, Copyright (C) year name of author
Gnomovision version 69, Copyright (C) year name of author
Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
This is free software, and you are welcome to redistribute it
under certain conditions; type `show c' for details.
......@@ -336,5 +335,5 @@ necessary. Here is a sample; alter the names:
This General Public License does not permit incorporating your program into
proprietary programs. If your program is a subroutine library, you may
consider it more useful to permit linking proprietary applications with the
library. If this is what you want to do, use the GNU Library General
library. If this is what you want to do, use the GNU Lesser General
Public License instead of this License.
......@@ -16,8 +16,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
SUBDIRS = src wwsympa soap web_tt2 mail_tt2 doc po po-wwsympa
......
SYMPA -- Système de Multi-Postage Automatique
SYMPA -- Système de Multi-Postage Automatique
SYMPA is an electronic mailing list manager. It is used to automate list
management functions such as subscription, moderation and management of
......@@ -13,16 +13,16 @@ Documentation is available under HTML and SGML (source) formats.
==============================================================================
SYMPA est un gestionnaire de listes électroniques. Il permet d'automatiser
les fonctions de gestion des listes telles les abonnements, la modération
et la gestion des archives. SYMPA gère également le renvoi des messages
adressés aux listes et permet de limiter la charge sur le système. Dans des
configurations avec suffisamment de mémoire, SYMPA est particulièrement
adapté aux grandes listes. Avec une liste de 20 000 abonnés, il faut 5
minutes pour envoyer un message à 90% des abonnés, lorsque le réseau est
disponible bien évidemment.
SYMPA est un gestionnaire de listes électroniques. Il permet d'automatiser
les fonctions de gestion des listes telles les abonnements, la modération
et la gestion des archives. SYMPA gère également le renvoi des messages
adressés aux listes et permet de limiter la charge sur le système. Dans des
configurations avec suffisamment de mémoire, SYMPA est particulièrement
adapté aux grandes listes. Avec une liste de 20 000 abonnés, il faut 5
minutes pour envoyer un message à 90% des abonnés, lorsque le réseau est
disponible bien évidemment.
La documentation est disponible sous forme HTML. Pour consulter
la première page veuillez ouvrir la page `doc/HTML/sympa.html' dans votre
outil de navigation préféré. Le source SGML de la doc est aussi disponible
pour génération du format imprimable de votre choix.
la première page veuillez ouvrir la page `doc/HTML/sympa.html' dans votre
outil de navigation préféré. Le source SGML de la doc est aussi disponible
pour génération du format imprimable de votre choix.
......@@ -16,8 +16,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
AC_PREREQ(2.60)
AC_INIT(sympa, 6.2a.32, sympa-authors@cru.fr)
......
......@@ -16,8 +16,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
SUBDIRS = man8 sample
......
man8_MANS = archived.8 bounced.8 alias_manager.8 sympa.8
EXTRA_DIST = archived.pod.in bounced.pod.in alias_manager.pod.in sympa.pod
EXTRA_DIST = archived.pod.in bounced.pod.in alias_manager.pod.in sympa.pod.in
CLEANFILES = $(man8_MANS) archived.pod bounced.pod alias_manager.pod
CLEANFILES = $(man8_MANS) archived.pod bounced.pod alias_manager.pod sympa.pod
.pod.8:
rm -f $@
$(AM_V_GEN)$(POD2MAN) --section=8 --center="sympa $(VERSION)" \
--lax --release="$(VERSION)" $< $@
archived.pod bounced.pod alias_manager.pod: Makefile
archived.pod bounced.pod alias_manager.pod sympa.pod: Makefile
rm -f $@
$(AM_V_GEN)$(SED) \
-e 's|--piddir--|$(piddir)|' \
......@@ -18,6 +18,8 @@ archived.pod bounced.pod alias_manager.pod: Makefile
-e 's|--defaultdir--|$(defaultdir)|' \
-e 's|--spooldir--|$(spooldir)|' \
-e 's|--docdir--|$(docdir)|' \
-e 's|--localedir--|$(localedir)|' \
-e 's|--CONFIG--|$(CONFIG)|' \
-e 's|--WWSCONFIG--|$(WWSCONFIG)|' \
-e 's|--SENDMAIL_ALIASES--|$(SENDMAIL_ALIASES)|' \
< $(srcdir)/$@.in > $@
......@@ -25,3 +27,4 @@ archived.pod bounced.pod alias_manager.pod: Makefile
archived.pod: $(srcdir)/archived.pod.in
bounced.pod: $(srcdir)/bounced.pod.in
alias_manager.pod: $(srcdir)/alias_manager.pod.in
sympa.pod: $(srcdir)/sympa.pod.in
=head1 NAME
alias_manager (or alias_manager.pl) - manage Sympa aliases
alias_manager, alias_manager.pl - manage Sympa aliases
=head1 SYNOPSYS
=head1 SYNOPSIS
S<B<alias_manager> B<add> | B<del> I<listname> I<domain>>
S<B<alias_manager.pl> B<add> | B<del> I<listname> I<domain>>
=head1 DESCRIPTION
......@@ -43,28 +43,34 @@ F<--SENDMAIL_ALIASES--> sendmail aliases file.
=head1 MORE DOCUMENTATION
The full documentation in HTML and PostScript formats can be
found in F</usr/share/doc/sympa/html/>.
The full documentation in HTML and PDF formats can be
found in L<http://www.sympa.org/manual/>.
The mailing lists (with web archives) can be accessed at
http://listes.cru.fr/wws/lists/informatique/sympa.
L<http://listes.renater.fr/sympa/lists/informatique/sympa>.
=head1 AUTHORS
Serge Aumont
Comité Réseau des Universités
=over 4
Olivier Salaün
Comité Réseau des Universités
=item Serge Aumont
Contact authors at <sympa-authors@cru.fr>
ComitE<233> RE<233>seau des UniversitE<233>s
This manual page was initially written by Jérôme Marant <jerome.marant@IDEALX.org>
=item Olivier SalaE<252>n
ComitE<233> RE<233>seau des UniversitE<233>s
=back
Contact authors at <sympa-authors@listes.renater.fr>
This manual page was initially written by JE<233>rE<244>me Marant <jerome.marant@IDEALX.org>
for the Debian GNU/Linux system.
=head1 COPYRIGHT
Copyright E<169> 1997,1998,1999,2000,2001 Comité Réseau des Universités
Copyright E<169> 1997,1998,1999,2000,2001 ComitE<233> RE<233>seau des UniversitE<233>s
Copyright E<169> 1997,1998,1999 Institut Pasteur & Christophe Wolfhugel
......@@ -76,11 +82,12 @@ under the terms of the GNU Free Documentation License, Version 1.1 or
any later version published by the Free Software Foundation; with no
Invariant Sections, no Front-Cover Texts and no Back-Cover Texts. A
copy of the license can be found under
F</usr/share/common-licenses/FDL>
L<http://www.gnu.org/licenses/fdl.html>.
=head1 BUGS
Report bugs to <sympa-dev@cru.fr>.
Report bugs to Sympa bug tracker.
See L<http://www.sympa.org/tracking>.
=head1 SEE ALSO
......
=head1 NAME
archived (or archived.pl) - Mailing List Archiving Daemon for WWSympa
archived, archived.pl - Mailing List Archiving Daemon for WWSympa
=head1 SYNOPSYS
=head1 SYNOPSIS
S<B<archived> [ B<-F> ] [ B<-d, -dF> ]>
S<B<archived.pl> [ B<-F> ] [ B<-d, -dF> ]>
=head1 DESCRIPTION
......@@ -13,7 +13,7 @@ feeds the web archives, converting messages to the HTML format and
linking them. Original mails are also kept (in I<arctxt/> directory> for later rebuilding of
archives.
The HTML conversion is achieved by the means of the B<MhOnArc> program.
The HTML conversion is achieved by the means of the B<MHonArc> program.
Archives are accessed via B<wwsympa.fcgi>, which proposes access control ;
therefore archives should not be located in a public web directory.
......@@ -42,35 +42,41 @@ F<--spooldir--/outgoing/> outgoing Sympa directory.
F<--defaultdir--/mhonarc-ressources> mhonarc ressource file
F<--sysconfdir--/wwsympa.conf> WWSympa configuration file.
F<--WWSCONFIG--> WWSympa configuration file.
F<--piddir--/archived.pid> this file contains the process ID
of F<archived.pl>.
=head1 MORE DOCUMENTATION
The full documentation in HTML and PostScript formats can be
found in F</usr/share/doc/sympa/html/>.
The full documentation in HTML and PDF formats can be
found in L<http://www.sympa.org/manual/>.
The mailing lists (with web archives) can be accessed at
http://listes.cru.fr/wws/lists/informatique/sympa.
L<http://listes.renater.fr/sympa/lists/informatique/sympa>.
=head1 AUTHORS
Serge Aumont
Comité Réseau des Universités
=over 4
Olivier Salaün
Comité Réseau des Universités
=item Serge Aumont
Contact authors at <sympa-authors@cru.fr>
ComitE<233> RE<233>seau des UniversitE<233>s
This manual page was initially written by Jérôme Marant <jerome.marant@IDEALX.org>
=item Olivier SalaE<252>n
ComitE<233> RE<233>seau des UniversitE<233>s
=back
Contact authors at <sympa-authors@listes.renater.fr>
This manual page was initially written by JE<233>rE<244>me Marant <jerome.marant@IDEALX.org>
for the Debian GNU/Linux system.
=head1 COPYRIGHT
Copyright E<169> 1997,1998,1999,2000,2001 Comité Réseau des Universités
Copyright E<169> 1997,1998,1999,2000,2001 ComitE<233> RE<233>seau des UniversitE<233>s
Copyright E<169> 1997,1998,1999 Institut Pasteur & Christophe Wolfhugel
......@@ -82,11 +88,12 @@ under the terms of the GNU Free Documentation License, Version 1.1 or
any later version published by the Free Software Foundation; with no
Invariant Sections, no Front-Cover Texts and no Back-Cover Texts. A
copy of the license can be found under
F</usr/share/common-licenses/FDL>
L<http://www.gnu.org/licenses/fdl.html>.
=head1 BUGS
Report bugs to <sympa-dev@cru.fr>.
Report bugs to Sympa bug tracker.
See L<http://www.sympa.org/tracking>.
=head1 SEE ALSO
......
=head1 NAME
bounced (or bounced.pl) - Mailing List Bounce Processing Daemon for WWSympa
bounced, bounced.pl - Mailing List Bounce Processing Daemon for WWSympa
=head1 SYNOPSYS
=head1 SYNOPSIS
S<B<bounced> [ B<-F> ] [ B<-d, -dF> ]>
S<B<bounced.pl> [ B<-F> ] [ B<-d, -dF> ]>
=head1 DESCRIPTION
......@@ -35,7 +35,7 @@ Run the program in a debug mode.
=head1 FILES
F<--sysconfdir--/wwsympa.conf> WWSympa configuration file.
F<--WWSCONFIG--> WWSympa configuration file.
F<--libexecdir--/bouncequeue> bounce spooler, referenced from sendmail alias file
......@@ -47,27 +47,33 @@ of F<bounced.pl>.
=head1 MORE DOCUMENTATION
The full documentation can be
found in F<--docdir-->.
found in L<http://www.sympa.org/manual/>.
The mailing lists (with web archives) can be accessed at
http://listes.cru.fr/wws/lists/informatique/sympa.
L<http://listes.renater.fr/sympa/lists/informatique/sympa>.
=head1 AUTHORS
Serge Aumont
Comité Réseau des Universités
=over 4
Olivier Salaün
Comité Réseau des Universités
=item Serge Aumont
Contact authors at <sympa-authors@cru.fr>
ComitE<233> RE<233>seau des UniversitE<233>s
This manual page was initially written by Jérôme Marant <jerome.marant@IDEALX.org>
=item Olivier SalaE<252>n
ComitE<233> RE<233>seau des UniversitE<233>s
=back
Contact authors at <sympa-authors@listes.renater.fr>
This manual page was initially written by JE<233>rE<244>me Marant <jerome.marant@IDEALX.org>
for the Debian GNU/Linux system.
=head1 COPYRIGHT
Copyright E<169> 1997,1998,1999,2000,2001 Comité Réseau des Universités
Copyright E<169> 1997,1998,1999,2000,2001 ComitE<233> RE<233>seau des UniversitE<233>s
Copyright E<169> 1997,1998,1999 Institut Pasteur & Christophe Wolfhugel
......@@ -79,11 +85,12 @@ under the terms of the GNU Free Documentation License, Version 1.1 or
any later version published by the Free Software Foundation; with no
Invariant Sections, no Front-Cover Texts and no Back-Cover Texts. A
copy of the license can be found under
F</usr/share/common-licenses/FDL>
L<http://www.gnu.org/licenses/fdl.html>.
=head1 BUGS
Report bugs to <sympa-dev@cru.fr>.
Report bugs to Sympa bug tracker.
See L<http://www.sympa.org/tracking>.
=head1 SEE ALSO
......
=head1 NAME
sympa (or sympa.pl) - A Modern Mailing List Manager
sympa, sympa.pl - A Modern Mailing List Manager
=head1 SYNOPSIS
S<B<sympa> [ B<-d, --debug> ] [ B<-f, --file>=I<another.sympa.conf> ]>
S<B<sympa.pl> [ B<-d, --debug> ] [ B<-f, --file>=I<another.sympa.conf> ]>
S<[ B<-k, --keepcopy>=I<directory> ]>
S<[ B<-l, --lang>=I<catalog> ]> [ B<-m, --mail> ]
S<[ B<-h, --help> ]> [ B<-v, --version> ]
......@@ -37,7 +37,7 @@ Enable debug mode.
=item B<-f, --file=>F<another.sympa.conf>
Force Sympa to use an alternative configuration file instead
of F</etc/sympa/sympa.conf>.
of F<--CONFIG-->.
=item B<-k, --keepcopy=>F<directory>
......@@ -48,7 +48,7 @@ store messages.
=item B<-l, --lang=>I<catalog>
Set this option to use a language catalog for Sympa. The corresponding
catalog file `catalogue'.cat must be located in F</usr/lib/sympa/nls>
catalog file `catalogue'.mo must be located in F<--localedir-->
directory.
=item B<-m, --mail>
......@@ -112,36 +112,42 @@ dumped in subscribers.db.dump.
=head1 FILES
F</etc/sympa/sympa.conf> main configuration file.
F<--CONFIG--> main configuration file.
F</var/spool/sympa/sympa.pid> this file contains the process ID
F<--piddir--/sympa.pid> this file contains the process ID
of F<sympa.pl>.
=head1 AVAILABILITY
Latest version of B<Sympa> is available from http://www.sympa.org.
Latest version of B<Sympa> is available from L<http://www.sympa.org/>.
=head1 MORE DOCUMENTATION
The full documentation in HTML and PostScript formats can be
found in F</usr/share/doc/sympa/html/>.
The full documentation in HTML and PDF formats can be
found in L<http://www.sympa.org/manual/>.
The mailing lists (with web archives) can be accessed at
http://listes.cru.fr/wws/lists/informatique/sympa.
L<http://listes.renater.fr/sympa/lists/informatique/sympa>.
=head1 AUTHORS
Serge Aumont
Comité Réseau des Universités
=over 4
Olivier Salaün
Comité Réseau des Universités
=item Serge Aumont
Contact authors at <sympa-authors@cru.fr>
ComitE<233> RE<233>seau des UniversitE<233>s
=item Olivier SalaE<252>n
ComitE<233> RE<233>seau des UniversitE<233>s
=back
Contact authors at <sympa-authors@listes.renater.fr>
=head1 COPYRIGHT
Copyright E<169> 1997,1998,1999,2000,2001 Comité Réseau des Universités
Copyright E<169> 1997,1998,1999,2000,2001 ComitE<233> RE<233>seau des UniversitE<233>s
Copyright E<169> 1997,1998,1999 Institut Pasteur & Christophe Wolfhugel
......@@ -150,7 +156,8 @@ Public License Version 2 (L<http://www.gnu.org/copyleft/gpl.html>)
=head1 BUGS
Report bugs to <sympa-dev@cru.fr>.
Report bugs to Sympa bug tracker.
See L<http://www.sympa.org/tracking>.
=head1 SEE ALSO
......
......@@ -16,8 +16,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
sampledir = $(docdir)/sample
nobase_sample_DATA = README \
......
......@@ -17,8 +17,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
## Print important changes in Sympa since last install
## It is based on the NEWS ***** entries
......
......@@ -16,8 +16,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
mailtemplate_DATA = authorization_reject.tt2 \
bye.tt2 certif_warning.tt2 \
......
......@@ -290,7 +290,7 @@ wwsympa/archived.pl.in
wwsympa/Auth.pm
wwsympa/bounced.pl.in
wwsympa/Bounce.pm
wwsympa/Challenge.pm
#wwsympa/Challenge.pm
wwsympa/cookielib.pm
wwsympa/Marc.pm
wwsympa/SharedDocument.pm
......
......@@ -19,8 +19,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
use POSIX qw (setlocale);
......
......@@ -16,8 +16,7 @@
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
execcgi_SCRIPTS = sympa_soap_server.fcgi
execcgi_PROGRAMS = sympa_soap_server-wrapper.fcgi
......
......@@ -7,8 +7,6 @@ use SympaSession;
use SOAP::Transport::HTTP;
@ISA = qw(SOAP::Transport::HTTP::FCGI);
1;
sub request {
my $self = shift;
......@@ -54,11 +52,14 @@ sub response {
if (my $response = $_[0]) {
if (defined $ENV{'SESSION_ID'}) {
my $expire = $main::param->{'user'}{'cookie_delay'} || $main::wwsconf->{'cookie_expire'};
my $cookie = &cookielib::set_cookie_soap($ENV{'SESSION_ID'}, $ENV{'SERVER_NAME'}, $expire);
my $expire =
$main::param->{'user'}{'cookie_delay'} ||
$main::wwsconf->{'cookie_expire'};
my $cookie = SympaSession::soap_cookie2(
$ENV{'SESSION_ID'}, $ENV{'SERVER_NAME'}, $expire
);
$response->headers->push_header('Set-Cookie2' => $cookie);
}
}
}
$self->SUPER::request(@_);
......@@ -85,3 +86,5 @@ sub handle ($$) {
}
return undef;
}