Changeset Navigation

Changeset 210

Timestamp:

03/01/06 10:08:33

Author:

miyagawa

Message:

Subscription::Bloglines: rename fetch_folders to fetch_meta. Set xmlUrl to $feed->url under fetch_meta mode.

Files:

r209	r210
68	68	$context->subscription->add($feed);
69	69
70		if ($self->conf->{fetch_~~folders~~}) {
	70	if ($self->conf->{fetch_meta}) {
71	71	# TODO: cache it!
72		$self->fetch_~~folders~~($context);
73		}
74		}
75		}
76
77		sub fetch_~~folders~~ {
	72	$self->fetch_meta($context);
	73	}
	74	}
	75	}
	76
	77	sub fetch_meta {
78	78	my($self, $context) = @_;
79	79
…	…
87	87	for my $feed (@feeds) {
88	88	# BloglinesSubId is different from bloglines:siteid. Don't use it
89		$self->{folders}->{$feed->{htmlUrl}} = $folder->{title};
90		$context->log(debug => "$feed->{htmlUrl}: $folder->{title}");
	89	$self->{bloglines_meta}->{$feed->{htmlUrl}} = {
	90	folder => $folder->{title},
	91	xmlUrl => $feed->{xmlUrl},
	92	};
91	93	}
92	94	}
…	…
115	117	$feed->meta->{bloglines_id} = $source->{bloglines}->{siteid};
116	118
117		# under fetch_folders option, set folder as tags to feeds
118		if (my $folder = $self->{folders}->{$feed->link}) {
119		$feed->tags([ $folder ]);
	119	# under fetch_pfolders option, set folder as tags to feeds
	120	if (my $meta = $self->{bloglines_meta}->{$feed->link}) {
	121	$feed->tags([ $meta->{folder} ]);
	122	$feed->url($meta->{xmlUrl});
120	123	}
121	124
…	…
185	188	to 1, the default.
186	189
187		=item fetch_~~folders~~
188
189		C<fetch_~~folders~~> specifies whether this plugin fetches I<folder>
	190	=item fetch_meta
	191
	192	C<fetch_meta> specifies whether this plugin fetches I<folder>
190	193	strucuture using listsubs API. With this option on, all feeds under
191	194	I<Plagger> folder will have I<Plagger> as its tag.