Committer: vsukhanov
LJSUP-10880: LJ::HTML::Metadata should be able to extract content of "og:url" tagU trunk/cgi-bin/LJ/HTML/Metadata.pm
Modified: trunk/cgi-bin/LJ/HTML/Metadata.pm =================================================================== --- trunk/cgi-bin/LJ/HTML/Metadata.pm 2011-12-23 09:15:08 UTC (rev 20850) +++ trunk/cgi-bin/LJ/HTML/Metadata.pm 2011-12-23 11:08:52 UTC (rev 20851) @@ -18,7 +18,7 @@ my ( @metadata_fields, %metadata_fields ); BEGIN { - @metadata_fields = qw( title description image ); + @metadata_fields = qw( title description image og_url ); @metadata_fields{@metadata_fields} = (); @FIELDS = ( qw( url html ua ), @metadata_fields ); } @@ -65,6 +65,11 @@ 'extract_attr' => 'content', 'fill' => 'og_image' }, + { + 'require_attr' => { 'property' => 'og:url' }, + 'extract_attr' => 'content', + 'fill' => 'og_url' + }, ], ); @@ -250,6 +255,8 @@ $self->image( $extracted_data{'og_image'} || $extracted_data{'link_image'} || $extracted_data{'html_image'} ); + + $self->og_url($extracted_data{'og_url'}); $self->{'_html_parsed'} = 1;