Commits

Anonymous committed b5eaa2c

Converted all the relevant tests to the ::OutputTransAndList.

Comments (0)

Files changed (1)

     reset_out_buffer();
 
     my $svn_ra_web =
-        SVN::RaWeb::Light->new(
+        SVN::RaWeb::Light::OutputTransAndList->new(
             'url' => "http://svn-i.shlomifish.org/svn/myrepos/",
             'url_translations' =>
             [
 
     # TEST
     is_deeply([split(/\n/, $results)], [(split /\n/, <<"EOF")]
-Content-Type: text/html
-
-<html><head><title>Revision 10900: /trunk/mydir</title></head>
-<body>
-<h2>Revision 10900: /trunk/mydir</h2>
 <table border="1">
 <tr><td><a href="http://y.y/trunk/mydir/">MyUrl</a></td></tr>
 </table>
 <li><a href=\"hello.pm?trans_hide_all=1&amp;trans_user=MyUrl,http://y.y/&amp;trans_no_list=1\">hello.pm</a></li>
 <li><a href=\"mydir/?trans_hide_all=1&amp;trans_user=MyUrl,http://y.y/&amp;trans_no_list=1\">mydir/</a></li>
 </ul>
-</body></html>
 EOF
     , "Checking for trans_no_list=1");
 }
     reset_out_buffer();
 
     my $svn_ra_web =
-        SVN::RaWeb::Light->new(
+        SVN::RaWeb::Light::OutputTransAndList->new(
             'url' => "http://svn-i.shlomifish.org/svn/myrepos/",
             'url_translations' =>
             [
 
     # TEST
     is_deeply([split(/\n/, $results)], [(split /\n/, <<"EOF")]
-Content-Type: text/html
-
-<html><head><title>Revision 10900: /</title></head>
-<body>
-<h2>Revision 10900: /</h2>
 <table border=\"1\">
 <tr><td><a href=\"svn://svn.myhost.mytld/hello/there/\">Read-Only</a></td></tr>
 <tr><td><a href=\"svn+ssh://svnwrite.myhost.mytld/root/myroot/\">Write</a></td></tr>
 <li><a href=\"hello.pm\">hello.pm</a> [<a href="svn://svn.myhost.mytld/hello/there/hello.pm">Read-Only</a>] [<a href="svn+ssh://svnwrite.myhost.mytld/root/myroot/hello.pm">Write</a>]</li>
 <li><a href=\"mydir/\">mydir/</a> [<a href="svn://svn.myhost.mytld/hello/there/mydir/">Read-Only</a>] [<a href="svn+ssh://svnwrite.myhost.mytld/root/myroot/mydir/">Write</a>]</li>
 </ul>
-</body></html>
 EOF
     , "Check for url_translations of a regular (non-root) directory.");        
 }