Author: earle Date: 2005-11-29 07:09:54 +0000 (Tue, 29 Nov 2005) New Revision: 720
Modified: trunk/t/21_rdf.t Log: finish fixing whitespace
Modified: trunk/t/21_rdf.t =================================================================== --- trunk/t/21_rdf.t 2005-11-29 07:07:03 UTC (rev 719) +++ trunk/t/21_rdf.t 2005-11-29 07:09:54 UTC (rev 720) @@ -12,7 +12,7 @@
SKIP: { skip "DBD::SQLite not installed - no database to test with", 24 - unless $have_sqlite; + unless $have_sqlite;
CGI::Wiki::Setup::SQLite::setup( { dbname => "t/node.db" } ); my $config = OpenGuides::Config->new( @@ -67,32 +67,31 @@ like( $rdfxml, qr|<?xml version="1.0"?>|, "RDF is encoding-neutral" );
like( $rdfxml, qr|foaf:nameBloomsbury</foaf:name>|, - "finds the first locale" ); + "finds the first locale" ); like( $rdfxml, qr|foaf:nameSt Pancras</foaf:name>|, - "finds the second locale" ); + "finds the second locale" );
like( $rdfxml, qr|<phone>test phone number</phone>|, - "picks up phone number" ); + "picks up phone number" );
like( $rdfxml, qr|chefmoz:Hourstest hours</chefmoz:Hours>|, - "picks up opening hours text" ); + "picks up opening hours text" );
like( $rdfxml, qr|<foaf:homepage rdf:resource="test website" />|, "picks up website" );
like( $rdfxml, - qr|dc:titleCGI::Wiki Test Site: Calthorpe Arms</dc:title>|, - "sets the title correctly" ); + qr|dc:titleCGI::Wiki Test Site: Calthorpe Arms</dc:title>|, + "sets the title correctly" );
like( $rdfxml, qr|dc:contributorKake</dc:contributor>|, - "last username to edit used as contributor" ); + "last username to edit used as contributor" );
like( $rdfxml, qr|wiki:version1</wiki:version>|, "version picked up" );
- like( $rdfxml, qr|<rdf:Description rdf:about="">|, - "sets the 'about' correctly" ); + like( $rdfxml, qr|<rdf:Description rdf:about="">|, "sets the 'about' correctly" );
like( $rdfxml, qr|<dc:source rdf:resource="http://wiki.example.com/mywiki.cgi%5C?Calthorpe_Arms" />|, - "set the dc:source with the version-independent uri" ); + "set the dc:source with the version-independent uri" );
like( $rdfxml, qr|<country>United Kingdom</country>|, "country" ). like( $rdfxml, qr|<city>London</city>|, "city" ). @@ -110,10 +109,10 @@ $config->default_country( "" ); my $guide = OpenGuides->new( config => $config ); OpenGuides::Test->write_data( - guide => $guide, - node => "Star Tavern", - latitude => 51.498, - longitude => -0.154, + guide => $guide, + node => "Star Tavern", + latitude => 51.498, + longitude => -0.154, ); $rdf_writer = OpenGuides::RDF->new( wiki => $guide->wiki, config => $config ); $rdfxml = $rdf_writer->emit_rdfxml( node => "Star Tavern" ); @@ -122,11 +121,9 @@
# Now test that there's a nice failsafe where a node doesn't exist. $rdfxml = eval { $rdf_writer->emit_rdfxml( node => "I Do Not Exist" ); }; - is( $@, "", - "->emit_rdfxml doesn't die when called on a nonexistent node" ); + is( $@, "", "->emit_rdfxml doesn't die when called on a nonexistent node" );
- like( $rdfxml, qr|wiki:version0</wiki:version>|, - "...and wiki:version is 0" ); + like( $rdfxml, qr|wiki:version0</wiki:version>|, "...and wiki:version is 0" );
# Test the data for a node that redirects. $wiki->write_node( "Calthorpe Arms Pub", @@ -141,6 +138,6 @@ my $redirect_rdf = $rdf_writer->emit_rdfxml( node => "Calthorpe Arms Pub" );
like( $redirect_rdf, qr|<owl:sameAs rdf:resource="/?id=Calthorpe_Arms;format=rdf#obj" />|, - "redirecting node gets owl:sameAs to target" ); + "redirecting node gets owl:sameAs to target" );
}