package IsfdbMaypole;
use strict;
use warnings;
use lib qw(/home/hossman/.perllib/lib/perl5/site_perl);
use base 'CGI::Maypole';
use Class::DBI::Loader::Relationship;

sub debug {1};

IsfdbMaypole->config->uri_base("http://XXXXXXXXXX/index.cgi/");
IsfdbMaypole->config->template_root("/home/hossman/public_html/isfdb-maypole/");
IsfdbMaypole->config->application_name("ISFDB Tool (Maypole Prototype)");
IsfdbMaypole->config->rows_per_page(10);
IsfdbMaypole->config->user("hossman");
IsfdbMaypole->config->pass("XXXXXXXXXXXXXXXXXXXXXX");
IsfdbMaypole->setup("dbi:mysql:hossman");
IsfdbMaypole->config->{loader}->relationship($_) for
    (
# leaving these lines as is causes ./author/list to break,
# but ./author/view links to ./notes/view
# ./pubs/list on the other hand works fine, but ./pubs/view
# doesn't link to ./notes/view
     "an author has a note",
#     "a pub has a note",
     );
1;