Changeset 1818
- Timestamp:
- 04/09/08 03:28:38 (8 months ago)
- Files:
-
- branches/release-34/lib/MT/AtomServer.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
branches/release-34/lib/MT/AtomServer.pm
r1744 r1818 300 300 use MT::Blog; 301 301 use MT::Entry; 302 use MT::Util qw( encode_xml );302 use MT::Util qw( encode_xml format_ts ); 303 303 use MT::Permission; 304 304 use File::Spec; … … 703 703 $feed->add_link({ rel => 'service.post', type => 'application/x.atom+xml', 704 704 href => $uri, title => $blogname }); 705 require URI; 706 my $site_uri = URI->new($blog->site_url); 707 if ( $site_uri ) { 708 my $blog_created = format_ts('%Y-%m-%d', $blog->created_on, $blog, 'en', 0); 709 my $id = 'tag:'.$site_uri->host.','.$blog_created.':'.$site_uri->path.'/'.$blog->id; 710 $feed->id($id); 711 } 705 712 $uri .= '/entry_id='; 706 713 while (my $entry = $iter->()) { … … 912 919 my $feed = $app->new_feed(); 913 920 my $base = $app->base . $app->uri; 921 require URI; 922 my $uri = URI->new($base); 923 if ( $uri ) { 924 my $created = MT::Util::format_ts('%Y-%m-%d', $user->created_on, undef, 'en', 0); 925 my $id = 'tag:'.$uri->host.','.$created.':'.$uri->path.'/weblogs-'.$user->id; 926 $feed->id($id); 927 } 914 928 while (my $thing = $iter->()) { 915 929 if ($thing->isa('MT::Permission')) {
