search order for ezmlmwebrc changed
css hint added to UPGARDE bug in subscribers form fixed list creation does not ask for options anymore create list with special characters - fixed
This commit is contained in:
parent
286c9c2cf9
commit
1f5946bb1d
4 changed files with 51 additions and 45 deletions
|
@ -91,10 +91,10 @@ if(defined($opt_C)) {
|
|||
require "$1"; # Command Line
|
||||
} elsif(-e "$HOME_DIR/.ezmlmwebrc") {
|
||||
require "$HOME_DIR/.ezmlmwebrc"; # User
|
||||
} elsif(-e "/etc/ezmlm/ezmlmwebrc") {
|
||||
require "/etc/ezmlm/ezmlmwebrc"; # System
|
||||
} elsif(-e "./ezmlmwebrc") {
|
||||
require "./ezmlmwebrc"; # Install
|
||||
} elsif(-e "/etc/ezmlm/ezmlmwebrc") {
|
||||
require "/etc/ezmlm/ezmlmwebrc"; # System
|
||||
} else {
|
||||
die "Unable to read config file";
|
||||
}
|
||||
|
@ -651,7 +651,7 @@ sub untaint {
|
|||
# special stuff
|
||||
|
||||
# check the list name
|
||||
if (($q->param('list') =~ /[^\w-]/) && ($q->param('list') !~ /^list_create_(do|ask)$/)) {
|
||||
if (($q->param('list') =~ /[^\w-]/) && ($q->param('action') !~ /^list_create_(do|ask)$/)) {
|
||||
$warning = 'InvalidListName' if ($warning eq '');
|
||||
$q->param(-name=>'list', -values=>'');
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue