senselab/codekasten
4
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

update ofwebusers file fixed

Browse source 
typo in german translation
This commit is contained in:
lars 2005-03-24 03:20:58 +00:00
parent a66ae705b0
commit 54676e9ff8
4 changed files with 12 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

11
ezmlm-web/trunk/ezmlm-web.cgi
View file

@ -185,7 +185,7 @@ unless (defined($q->param('state'))) {
$part = 'digest';
}
if ($Q::action eq '[Delete Address]') { # Delete a subscriber ...
if ($Q::action eq "[$BUTTON{'deleteaddress'}]") { # Delete a subscriber ...
&delete_address("$LIST_DIR/$Q::list", $part);
&part_subscribers($part);
@ -920,12 +920,9 @@ sub update_webusers {
open(TMP, "</tmp/ezmlm-web.$$");
open(WU, ">$WEBUSERS_FILE");
while(<TMP>) {
if(/^$Q::list\s*:/) {
print WU "$Q::list\: $Q::webusers\n";
} else {
print WU;
}
}
print WU unless (/^$Q::list\s*:/);
}
print WU "$Q::list\: $Q::webusers\n";
close TMP; close WU;
unlink "/tmp/ezmlm-web.$$";
}