--- trunk/sender.pl 2005/05/14 13:21:35 9 +++ trunk/sender.pl 2005/05/14 18:20:50 11 @@ -53,12 +53,12 @@ my $users = $loader->find_class('users'); my $user_list = $loader->find_class('user_list'); my $messages = $loader->find_class('messages'); -my $message_list = $loader->find_class('message_list'); +my $queue = $loader->find_class('queue'); =item --list[=list_name] -List all available lists and users on them. Optional value to list -(like C<--list=list_name>) will produce users just on that list. +List all available lists and users on them. Optional value is name of list +and it will produce users just on that list. =cut @@ -144,7 +144,7 @@ $this_message->dbi_commit(); - $message_list->find_or_create({ + $queue->find_or_create({ message_id => $this_message->id, list_id => $this_list->id, }) || die "can't add message ",$this_message->id," to list ",$this_list->id, ": ",$this_list->name;