IsfdbMaypole->config->{loader}->relationship($_) for ( "an author has a note", "a pub has a note", ); #### plugin error - Class: plugin not found at /home/hossman/.perllib/lib/perl5/site_perl/5.8.5/Maypole.pm line 123 #### mysql> describe pubs; +------------+-------------+------+-----+---------+----------------+ | Field | Type | Null | Key | Default | Extra | +------------+-------------+------+-----+---------+----------------+ | pubid | int(11) | | PRI | NULL | auto_increment | | title | mediumtext | YES | | NULL | | | author | mediumtext | YES | | NULL | | | tag | varchar(32) | YES | | NULL | | | year | date | YES | | NULL | | | publisher | varchar(64) | YES | | NULL | | | pages | varchar(16) | YES | | NULL | | | ptype | varchar(8) | YES | | NULL | | | ctype | varchar(8) | YES | | NULL | | | isbn | varchar(16) | YES | | NULL | | | isbn2 | varchar(16) | YES | | NULL | | | coverart | mediumtext | YES | | NULL | | | bcoverart | mediumtext | YES | | NULL | | | frontimage | mediumtext | YES | | NULL | | | price | varchar(16) | YES | | NULL | | | note | int(11) | YES | | NULL | | +------------+-------------+------+-----+---------+----------------+ 16 rows in set (0.00 sec) mysql> describe authors; +------------+-------------+------+-----+---------+----------------+ | Field | Type | Null | Key | Default | Extra | +------------+-------------+------+-----+---------+----------------+ | pubid | int(11) | | PRI | NULL | auto_increment | | canonical | mediumtext | YES | | NULL | | | legalname | mediumtext | YES | | NULL | | | birthplace | varchar(64) | YES | | NULL | | | birthdate | date | YES | | NULL | | | deathdate | date | YES | | NULL | | | pseudos | mediumtext | YES | | NULL | | | emails | mediumtext | YES | | NULL | | | webpages | mediumtext | YES | | NULL | | | note | int(11) | YES | | NULL | | +------------+-------------+------+-----+---------+----------------+ 10 rows in set (0.00 sec) mysql> describe notes -> ; +-------+------------+------+-----+---------+----------------+ | Field | Type | Null | Key | Default | Extra | +-------+------------+------+-----+---------+----------------+ | pubid | int(11) | | PRI | NULL | auto_increment | | note | mediumtext | YES | | NULL | | +-------+------------+------+-----+---------+----------------+ 2 rows in set (0.00 sec) #### 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;