Changeset 1950

Show
Ignore:
Timestamp:
05/16/07 04:27:56
Author:
otsune
Message:

opps. fix constractor parameter and add method ref

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/lib/Plagger/Plugin/Publish/Buzzurl.pm

    r1949 r1950  
    1818sub initialize { 
    1919    my ($self, $context, $args) = @_; 
    20     $self->{buzzurl} = WebService::BuzzurlAPI->new({ 
     20    $self->{buzzurl} = WebService::BuzzurlAPI->new( 
    2121        email    => $self->conf->{usermail}, 
    2222        password => $self->conf->{password}, 
    23     }); 
     23    ); 
    2424} 
    2525 
    …… 
    3737    } 
    3838 
    39     my $res = $self->{buzzurl}->add($params); 
     39    my $res = $self->{buzzurl}->add(%{$params}); 
    4040 
    4141    if ($res->is_success) {