ezmlm-web/ezmlm-web
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

fixed handling of list addresses containing a dot

Browse source
This commit is contained in:
lars 2006-07-11 01:49:33 +00:00
parent cdd6a8c1f2
commit 58bd26889c
3 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
TODO
View file

@ -1,5 +1,7 @@
clearsilver-Infos updaten
die nicht-Abonnenten-Listen (allow/deny/mod) sagen trotzdem: "x AbonnentInnen"
charset support for idx <= 5.0
suppress success message, if no new subscriber addresses were selected for adding

2
changelog
View file

@ -6,7 +6,7 @@ Version 3.2 - 04/14/02006
* handling of empty settings for ezmlm-idx 5.0 fixed (closes #21)
* script for creating binary suid wrappers added
* bug in MySQL support fixed
* treatment of the special character "dot" in listname fixed
* treatment of the special character "dot" in listname and list address fixed
Version 3.1.4 - 03/26/02006
* new setting: DOTQMAIL_DIR (useful for multi domain vpopmail setups)

5
ezmlm-web.cgi
View file

@ -21,7 +21,7 @@ use DB_File;
use CGI;
use IO::File;
use POSIX qw(tmpnam);
use Encode qw/ from_to /; # added by ooyama for char convert
use Encode;
use English;
# do not forget: we depend on Mail::Ezmlm::Gpg if the corresponding configuration
@ -1215,6 +1215,9 @@ sub create_list {
# Some taint checking ...
$qmail = $1 if $q->param('inlocal') =~ /(?:$USER-)?([^\<\>\\\/\s]+)$/;
# dots have to be turned into colons
# see http://www.qmail.org/man/man5/dot-qmail.html
$qmail =~ s/\./:/g;
$listname = $q->param('list');
if ($listname =~ m/[^\w\.-]/) {
$warning = 'InvalidListName';