--- /root/.cpan/build/SVN-Web-0.53/lib/SVN/Web.pm       2007-04-29 12:22:51.000000000 -0700
+++ /usr/lib/perl5/site_perl/5.8.8/SVN/Web.pm   2009-12-11 11:36:53.000000000 -0800
@@ -119,20 +119,22 @@
 sub get_repos {
     my($repos) = @_;
 
-    SVN::Web::X->throw(
-        error => '(unconfigured repository)',
-        vars  => []
-    ) unless exists $config->{repos}{$repos} || $config->{reposparent};
+#    SVN::Web::X->throw(
+#        error => '(unconfigured repository)',
+#        vars  => []
+#    ) unless exists $config->{repos}{$repos} || $config->{reposparent};
 
     my $repo_uri =
         $config->{reposparent}
            ? File::Spec->catdir($config->{reposparent}, $repos)
                : $config->{repos}{$repos};
 
-    SVN::Web::X->throw(
-        error => '(no such repo %1 %2)',
-        vars  => [$repos, $repo_uri]
-    ) unless defined $repos and (exists $config->{repos}{$repos} or -e $repo_uri);
+$repo_uri = 'svn://svn.wowace.com/wow/' . $repos . '/mainline' if ! $repo_uri;
+
+#    SVN::Web::X->throw(
+#        error => '(no such repo %1 %2)',
+#        vars  => [$repos, $repo_uri]
+#    ) unless defined $repos and (exists $config->{repos}{$repos} or -e $repo_uri);
 
     $repo_uri =~ s{/$}{}g;     # Trim trailing '/', SVN::Repos::open fails
                                # otherwise