X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=Makefile.PL;h=a1e613194db7ed4f816d24b296f2493fe26a90c5;hb=b60178968c046206aa97123141d4dca524fb67c7;hp=f9bcfa1dc55cf210baef3fa0fcc82638f213892f;hpb=6979dda653a0eb6f083a348df56fa42b34484e36;p=maypole.git diff --git a/Makefile.PL b/Makefile.PL index f9bcfa1..a1e6131 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -3,14 +3,17 @@ use ExtUtils::MakeMaker; # See lib/ExtUtils/MakeMaker.pm for details of how to influence # the contents of the Makefile that is written. WriteMakefile( - NAME => 'Apache::MVC', - VERSION_FROM => 'lib/Apache/MVC.pm', # finds $VERSION + NAME => 'Maypole', + VERSION_FROM => 'lib/Maypole.pm', # finds $VERSION PREREQ_PM => { - DBD::SQLite => 0, # For testing - Class::DBI::Loader => 0, + Class::DBI::Loader => '0.02', + Class::DBI::AbstractSearch => 0, + Class::DBI::Pager => 0, + Class::DBI::Plugin::RetrieveAll => 0, Class::DBI::AsForm => 0, Class::DBI::FromCGI => 0, Class::DBI::Loader::Relationship => 0, + CGI::Untaint => 0, UNIVERSAL::moniker => 0, UNIVERSAL::require => 0, Apache::Request => 0, @@ -18,12 +21,13 @@ WriteMakefile( }, # e.g., Module::Name => 1.1 ($] >= 5.005 ? ## Add these new keywords supported since 5.005 (ABSTRACT_FROM => 'lib/Apache/MVC.pm', # retrieve abstract from module - AUTHOR => 'Simon Cozens ') : ()), + AUTHOR => 'Simon Cozens ') : ()), ); if (!-e "t/beerdb.db") { print "Making SQLite DB\n"; - require DBD::SQLite; + eval { require DBD::SQLite }; + die "No, wait, we don't have SQLite installed. Never mind\n" if $@; require DBI; my $dbh = DBI->connect("dbi:SQLite:dbname=t/beerdb.db"); @@ -41,14 +45,14 @@ if (!-e "t/beerdb.db") { __DATA__ create table brewery ( - id int not null auto_increment primary key, + id int auto_increment primary key, name varchar(30), url varchar(50), notes text ); create table beer ( - id int not null auto_increment primary key, + id int auto_increment primary key, brewery integer, style integer, name varchar(30), @@ -61,18 +65,24 @@ create table beer ( ); create table handpump ( - id int not null auto_increment primary key, + id int auto_increment primary key, beer integer, pub integer ); create table pub ( - id int not null auto_increment primary key, + id int auto_increment primary key, name varchar(60), url varchar(120), notes text ); +create table style ( + id int auto_increment primary key, + name varchar(60), + notes text +); + INSERT INTO beer (id, brewery, name, abv) VALUES (1, 1, "Organic Best Bitter", "4.1"); INSERT INTO brewery (id, name, url) VALUES