Show contents of "dc:creator" element as post author in syndicated
feeds.
Patch by afuna.
diffs (35 lines):
diff -r 4af523013a87 -r 16f32224086c cgi-bin/LJ/ParseFeed.pm
--- a/cgi-bin/LJ/ParseFeed.pm Thu Nov 12 12:41:30 2009 -0600
+++ b/cgi-bin/LJ/ParseFeed.pm Thu Nov 12 19:43:32 2009 -0600
@@ -89,6 +89,7 @@ sub parse_feed
$item->{'text'} = $_->{'description'};
$item->{'link'} = $_->{'link'} if $_->{'link'};
$item->{'id'} = $_->{'guid'} if $_->{'guid'};
+ $item->{author} = $_->{dc}->{creator} if $_->{dc} &&
$_->{dc}->{creator};
my $nsdc = 'http://purl.org/dc/elements/1.1/';
my $nsenc = 'http://purl.org/rss/1.0/modules/content/';
diff -r 4af523013a87 -r 16f32224086c cgi-bin/LJ/SynSuck.pm
--- a/cgi-bin/LJ/SynSuck.pm Thu Nov 12 12:41:30 2009 -0600
+++ b/cgi-bin/LJ/SynSuck.pm Thu Nov 12 19:43:32 2009 -0600
@@ -279,6 +279,11 @@ sub process_content {
$it->{'text'} =~ s/^\s+//;
$it->{'text'} =~ s/\s+$//;
+ my $author = "";
+ if ( defined $it->{author} ) {
+ $author = "<p class='syndicationauthor'>Posted by " . LJ::ehtml(
$it->{author} ) . "</p>";
+ }
+
my $htmllink;
if (defined $it->{'link'}) {
$htmllink = "<p class=\"ljsyndicationlink\">" .
@@ -329,7 +334,7 @@ sub process_content {
'username' => $user,
'ver' => 1,
'subject' => $it->{'subject'},
- 'event' => "$htmllink$it->{'text'}",
+ 'event' => "$author$htmllink$it->{'text'}",
'year' => $year,
'mon' => $mon,
'day' => $day,
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog
