Fix two typo in pseudo create script

tags/smeserver-phplist-0.2.1-1
Daniel Berteaud 10 years ago
parent 1089c52918
commit d7e9a3044e
  1. 4
      root/etc/e-smith/events/actions/phplist-create-pseudo

@ -6,14 +6,14 @@ use esmith::AccountsDB;
my $a = esmith::AccountsDB->open or die "Couldn't open AccountsDB\n"; my $a = esmith::AccountsDB->open or die "Couldn't open AccountsDB\n";
my $peudo = $a->get('listreports'); my $pseudo = $a->get('listreports');
if (!$pseudo){ if (!$pseudo){
$a->new_record('listreports',{ $a->new_record('listreports',{
type => 'pseudonym', type => 'pseudonym',
Account => 'admin' Account => 'admin'
}); });
unless ( system("/sbin/e-smith/signal-event", "pseudonym-createe", "listreports") == 0 ){ unless ( system("/sbin/e-smith/signal-event", "pseudonym-create", "listreports") == 0 ){
die "Failed to create pseudonym listreports\n"; die "Failed to create pseudonym listreports\n";
} }
} }

Loading…
Cancel
Save