--- trunk/lib/Nos.pm 2005/05/15 21:19:26 20 +++ trunk/Nos.pm 2005/05/15 21:35:15 21 @@ -71,25 +71,19 @@ $self ? return $self : return undef; } -=head2 AUTOLOAD +=head2 update_list_email -Returns class from L. +Update list e-mail address - my $lists = $nos->lists; + $noc->update_list_email($list, 'foobar@example.com'); -is equivalent to: +=cut - my $lists = $loader->find_class('lists'); +sub update_list_email { + my $self = shift; -=cut -#sub AUTOLOAD { -# return if $AUTOLOAD =~ m/DESTROY$/; -# my ($name) = $AUTOLOAD =~ /([^:]+)$/; -# -# return $self->{'loader'}->find_class($AUTOLOAD) || -# croak "unknown method '$AUTOLOAD' called"; -#} +} =head2 send