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 UPGRADING ezmlm-web 2.3 to ezmlm-web 3.0
1) install clearsilver (see INSTALL for details) 1) install clearsilver (see INSTALL for details)
2) copy the "template" directory somewhere (see INSTALL again) 2) copy the "template" directory somewhere (see INSTALL again)
3) set "TEMPLATE_DIR" in your ezmlmwebrc file to this directory 3) set "TEMPLATE_DIR" in your ezmlmwebrc file to this directory
4) maybe you want to define "MAIL_DOMAIN" in your ezmlmwebrc 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 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 require "$1"; # Command Line
} elsif(-e "$HOME_DIR/.ezmlmwebrc") { } elsif(-e "$HOME_DIR/.ezmlmwebrc") {
require "$HOME_DIR/.ezmlmwebrc"; # User require "$HOME_DIR/.ezmlmwebrc"; # User
} elsif(-e "/etc/ezmlm/ezmlmwebrc") {
require "/etc/ezmlm/ezmlmwebrc"; # System
} elsif(-e "./ezmlmwebrc") { } elsif(-e "./ezmlmwebrc") {
require "./ezmlmwebrc"; # Install require "./ezmlmwebrc"; # Install
} elsif(-e "/etc/ezmlm/ezmlmwebrc") {
require "/etc/ezmlm/ezmlmwebrc"; # System
} else { } else {
die "Unable to read config file"; die "Unable to read config file";
} }
@ -651,7 +651,7 @@ sub untaint {
# special stuff # special stuff
# check the list name # 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 ''); $warning = 'InvalidListName' if ($warning eq '');
$q->param(-name=>'list', -values=>''); $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) value="<?cs var:html_escape(Data.UserName)
?>"> @ <input type="text" name="inhost" size="30" value="<?cs ?>"> @ <input type="text" name="inhost" size="30" value="<?cs
var:html_escape(Data.HostName) ?>"></li> var:html_escape(Data.HostName) ?>"></li>
<li><?cs var:html_escape(Lang.Misc.ListOptions) ?>:
<ul>
<li><?cs call:checkbox("p") ?></li> <?cs if:Data.Modules.MySQL ?>
<li><?cs call:checkbox("a") ?></li> <!-- Allow creation of mysql table if the module allows it -->
<li><?cs call:checkbox("u") ?></li> <li><?cs call:setting("6") ?></li><?cs /if ?>
<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 ?>
</ul>
<?cs if:Data.WebUser.show ?> <?cs if:Data.WebUser.show ?>
<li><label for="webusers"><?cs var:html_escape(Lang.Misc.AllowedToEdit) ?>:</label> <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 ?> <?cs /if ?>
</legend> </legend>
<!-- this form has to be "multipart/form-data" to make file upload work --> <table class="subscribers"><tr>
<form method="post" action="<?cs var:ScriptName ?>" enctype="multipart/form-data"> <?cs if:subcount(Data.List.Subscribers) > 0 ?>
<input type="hidden" name="list" value="<?cs var:Data.List.Name ?>" /> <td><form method="post" action="<?cs var:ScriptName ?>" enctype="application/x-www-form-urlencoded">
<?cs if:Data.List.PartType ?> <input type="hidden" name="list" value="<?cs var:Data.List.Name ?>" />
<input type="hidden" name="part" value="<?cs var:Data.List.PartType ?>" /> <?cs if:Data.List.PartType ?>
<?cs /if ?> <input type="hidden" name="part" value="<?cs var:Data.List.PartType ?>" />
<?cs /if ?>
<table class="subscribers"><tr> <ul>
<?cs if:subcount(Data.List.Subscribers) > 0 ?> <!-- scrollbox for list's subscribers -->
<td><ul> <!-- Keep selection box a reasonable size - suggested by Sebastian Andersson -->
<!-- scrollbox for list's subscribers --> <?cs if:subcount(Data.List.Subscribers) > 15 ?>
<!-- Keep selection box a reasonable size - suggested by Sebastian Andersson --> <?cs set:Data.ScrollSize = 15 ?>
<?cs if:subcount(Data.List.Subscribers) > 15 ?> <?cs else ?>
<?cs set:Data.ScrollSize = 15 ?> <?cs set:Data.ScrollSize = subcount(Data.List.Subscribers) ?>
<?cs else ?> <?cs /if ?>
<?cs set:Data.ScrollSize = subcount(Data.List.Subscribers) ?> <li><select name="mailaddress_del"
<?cs /if ?> size="<?cs var:Data.ScrollSize ?>" multiple="multiple">
<li><select name="mailaddress_del" <?cs each:item = Data.List.Subscribers ?>
size="<?cs var:Data.ScrollSize ?>" multiple="multiple"> <option><?cs var:item ?></option>
<?cs each:item = Data.List.Subscribers ?> <?cs /each ?>
<option><?cs var:item ?></option> </select></li>
<?cs /each ?> <li><?cs var:subcount(Data.List.Subscribers) ?> <?cs var:html_escape(Lang.Misc.Subscribers) ?></li>
</select></li> <li><input type="hidden" name="action" value="address_del" />
<li><?cs var:subcount(Data.List.Subscribers) ?> <?cs var:html_escape(Lang.Misc.Subscribers) ?></li> <button type="submit" name="send" value="do"><?cs var:html_escape(Lang.Buttons.DeleteAddress) ?></button></li>
<li><input type="hidden" name="action" value="address_del" /> </ul></form></td>
<button type="submit" name="send" value="do"><?cs var:html_escape(Lang.Buttons.DeleteAddress) ?></button></li> <?cs /if ?>
</ul></td>
<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 ?> <?cs /if ?>
<ul>
<td><ul>
<li><?cs var:html_escape(Lang.Misc.AddSubscriberAddress) ?> <li><?cs var:html_escape(Lang.Misc.AddSubscriberAddress) ?>
<ul><li><input type="text" name="mailaddress_add" size="40" /></li> <ul><li><input type="text" name="mailaddress_add" size="40" /></li>
@ -117,9 +122,11 @@
<li><input type="hidden" name="action" value="address_add" /> <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> <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> </fieldset>
<?cs /if ?> <?cs /if ?>