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

search order for ezmlmwebrc changed

Browse source 
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:
lars 2005-12-23 12:37:33 +00:00
parent 286c9c2cf9
commit 1f5946bb1d
4 changed files with 51 additions and 45 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
ezmlm-web-3.0/UPGRADING
View file

@ -5,15 +5,22 @@ This file contains some useful hints for upgrading from a previous version of ez
UPGRADING ezmlm-web 2.3 to ezmlm-web 3.0
1) install clearsilver (see INSTALL for details)
2) copy the "template" directory somewhere (see INSTALL again)
3) set "TEMPLATE_DIR" in your ezmlmwebrc file to this directory
4) maybe you want to define "MAIL_DOMAIN" in your ezmlmwebrc
5) search order for ezmlmwebrc changed
from HOME->SYSTEM->CGI_DIR
to HOME->CGI_DIR->SYSTEM
------------------------------------------------------------------------------
UPGRADING ezmlm-web 2.2 to ezmlm-web 2.3
there are no known issues
1) set location of css file in ezmlmwebrc
------------------------------------------------------------------------------

6
ezmlm-web-3.0/ezmlm-web.cgi
View file

@ -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=>'');
}

14
ezmlm-web-3.0/template/list_create.cs
View file

@ -15,19 +15,11 @@
value="<?cs var:html_escape(Data.UserName)
?>"> @ <input type="text" name="inhost" size="30" value="<?cs
var:html_escape(Data.HostName) ?>"></li>
<li><?cs var:html_escape(Lang.Misc.ListOptions) ?>:
<ul>
<li><?cs call:checkbox("p") ?></li>
<li><?cs call:checkbox("a") ?></li>
<li><?cs call:checkbox("u") ?></li>
<li><?cs call:checkbox("d") ?></li>
<?cs if:Data.Modules.MySQL ?>
<!-- Allow creation of mysql table if the module allows it -->
<li><?cs call:setting("6") ?></li><?cs /if ?>
<?cs if:Data.Modules.MySQL ?>
<!-- Allow creation of mysql table if the module allows it -->
<li><?cs call:setting("6") ?></li><?cs /if ?>
</ul>
<?cs if:Data.WebUser.show ?>
<li><label for="webusers"><?cs var:html_escape(Lang.Misc.AllowedToEdit) ?>:</label>

67
ezmlm-web-3.0/template/subscribers.cs
View file

@ -74,36 +74,41 @@
<?cs /if ?>
</legend>
<!-- this form has to be "multipart/form-data" to make file upload work -->
<form method="post" action="<?cs var:ScriptName ?>" enctype="multipart/form-data">
<input type="hidden" name="list" value="<?cs var:Data.List.Name ?>" />
<?cs if:Data.List.PartType ?>
<input type="hidden" name="part" value="<?cs var:Data.List.PartType ?>" />
<?cs /if ?>
<table class="subscribers"><tr>
<?cs if:subcount(Data.List.Subscribers) > 0 ?>
<td><form method="post" action="<?cs var:ScriptName ?>" enctype="application/x-www-form-urlencoded">
<input type="hidden" name="list" value="<?cs var:Data.List.Name ?>" />
<?cs if:Data.List.PartType ?>
<input type="hidden" name="part" value="<?cs var:Data.List.PartType ?>" />
<?cs /if ?>
<table class="subscribers"><tr>
<?cs if:subcount(Data.List.Subscribers) > 0 ?>
<td><ul>
<!-- scrollbox for list's subscribers -->
<!-- Keep selection box a reasonable size - suggested by Sebastian Andersson -->
<?cs if:subcount(Data.List.Subscribers) > 15 ?>
<?cs set:Data.ScrollSize = 15 ?>
<?cs else ?>
<?cs set:Data.ScrollSize = subcount(Data.List.Subscribers) ?>
<?cs /if ?>
<li><select name="mailaddress_del"
size="<?cs var:Data.ScrollSize ?>" multiple="multiple">
<?cs each:item = Data.List.Subscribers ?>
<option><?cs var:item ?></option>
<?cs /each ?>
</select></li>
<li><?cs var:subcount(Data.List.Subscribers) ?> <?cs var:html_escape(Lang.Misc.Subscribers) ?></li>
<li><input type="hidden" name="action" value="address_del" />
<button type="submit" name="send" value="do"><?cs var:html_escape(Lang.Buttons.DeleteAddress) ?></button></li>
</ul></td>
<ul>
<!-- scrollbox for list's subscribers -->
<!-- Keep selection box a reasonable size - suggested by Sebastian Andersson -->
<?cs if:subcount(Data.List.Subscribers) > 15 ?>
<?cs set:Data.ScrollSize = 15 ?>
<?cs else ?>
<?cs set:Data.ScrollSize = subcount(Data.List.Subscribers) ?>
<?cs /if ?>
<li><select name="mailaddress_del"
size="<?cs var:Data.ScrollSize ?>" multiple="multiple">
<?cs each:item = Data.List.Subscribers ?>
<option><?cs var:item ?></option>
<?cs /each ?>
</select></li>
<li><?cs var:subcount(Data.List.Subscribers) ?> <?cs var:html_escape(Lang.Misc.Subscribers) ?></li>
<li><input type="hidden" name="action" value="address_del" />
<button type="submit" name="send" value="do"><?cs var:html_escape(Lang.Buttons.DeleteAddress) ?></button></li>
</ul></form></td>
<?cs /if ?>
<td><td><form method="post" action="<?cs var:ScriptName ?>" enctype="multipart/form-data">
<!-- this form has to be "multipart/form-data" to make file upload work -->
<input type="hidden" name="list" value="<?cs var:Data.List.Name ?>" />
<?cs if:Data.List.PartType ?>
<input type="hidden" name="part" value="<?cs var:Data.List.PartType ?>" />
<?cs /if ?>
<td><ul>
<ul>
<li><?cs var:html_escape(Lang.Misc.AddSubscriberAddress) ?>
<ul><li><input type="text" name="mailaddress_add" size="40" /></li>
@ -117,9 +122,11 @@
<li><input type="hidden" name="action" value="address_add" />
<button type="submit" name="send" value="do"><?cs var:html_escape(Lang.Buttons.AddAddress) ?></button></li>
</ul></td></tr></table>
</ul>
</form>
</td></tr>
</table>
</form>
</fieldset>
<?cs /if ?>