Changeset 447

Show
Ignore:
Timestamp:
04/01/06 03:22:18
Author:
miyagawa
Message:

Added plugin_id method to mean object ID, not class ID. Fixes #95

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/plagger/assets/plugins/publish-takahashi/takahashi.tt

    r445 r447  
    11<?xml version="1.0" encoding="UTF-8"?><?xml-stylesheet href="chrome://global/skin/" type="text/css"?><?xml-stylesheet href="takahashi.css" type="text/css"?><page xmlns="http://www.mozilla.org/keymaster/gatekeeper/there.is.only.xul" id="presentation" xmlns:html="http:/www.w3.org/1999/xhtml" orient="vertical" onkeypress="Presentation.onKeyPress(event);"><html:textarea id="builtinCode" style="visibility: collapse"> 
     2[% feed.title | html %] 
     3---- 
    24[% FOREACH entry = feed.entries %] 
    35[% entry.title | html %] 
  • trunk/plagger/lib/Plagger/CacheProxy.pm

    r368 r447  
    55    my($class, $plugin, $cache) = @_; 
    66    bless { 
    7         namespace => $plugin->class_id, 
     7        namespace => $plugin->plugin_id, 
    88        cache     => $cache, 
    99    }, $class; 
  • trunk/plagger/lib/Plagger/Plugin.pm

    r415 r447  
    5353} 
    5454 
     55# subclasses may overload to avoid cache sharing 
     56sub plugin_id { 
     57    my $self = shift; 
     58    $self->class_id; 
     59} 
     60 
    5561sub assets_dir { 
    5662    my $self = shift; 
  • trunk/plagger/lib/Plagger/Plugin/CustomFeed/Frepa.pm

    r430 r447  
    66use Encode; 
    77use Time::HiRes; 
     8 
     9sub plugin_id { 
     10    my $self = shift; 
     11    $self->class_id . '-' . $self->conf->{livedoor_id}; 
     12} 
    813 
    914sub register { 
  • trunk/plagger/lib/Plagger/Plugin/CustomFeed/Mixi.pm

    r432 r447  
    77use WWW::Mixi; 
    88use Time::HiRes; 
     9 
     10sub plugin_id { 
     11    my $self = shift; 
     12    $self->class_id . '-' . $self->conf->{email}; 
     13} 
    914 
    1015sub register { 
  • trunk/plagger/lib/Plagger/Plugin/CustomFeed/Yahoo360JP.pm

    r430 r447  
    77use Time::HiRes; 
    88use WWW::Mechanize; 
     9 
     10sub plugin_id { 
     11    my $self = shift; 
     12    $self->class_id . '-' . $self->conf->{username}; 
     13} 
    914 
    1015sub register { 
  • trunk/plagger/lib/Plagger/Plugin/Notify/Campfire.pm

    r242 r447  
    66 
    77our $VERSION = 0.01; 
     8 
     9sub plugin_id { 
     10    my $self = shift; 
     11    $self->class_id . '-' . $self->conf->{email}; 
     12} 
    813 
    914sub register { 
  • trunk/plagger/lib/Plagger/Plugin/Subscription/Bloglines.pm

    r430 r447  
    55our $VERSION = '0.10'; 
    66use WebService::Bloglines; 
     7 
     8sub plugin_id { 
     9    my $self = shift; 
     10    $self->class_id . '-' . $self->conf->{username}; 
     11} 
    712 
    813sub register {