X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FBeerDB.pm;h=b7961bc1e8874a22beaa670eb09d1ace92455534;hb=9bbeafd23117d2b489a298cc002a97b133de17bd;hp=ec9677adab670d142a7c7f9bc91fedcfc207f265;hpb=36771d413d04b15c41e9801c4ab831815378f89f;p=maypole.git diff --git a/lib/BeerDB.pm b/lib/BeerDB.pm index ec9677a..b7961bc 100644 --- a/lib/BeerDB.pm +++ b/lib/BeerDB.pm @@ -1,18 +1,18 @@ package BeerDB; use base 'Apache::MVC'; use Class::DBI::Loader::Relationship; -# This line is required if you don't have Apache calling Perl handlers -# as methods. -sub handler { Apache::MVC::handler(__PACKAGE__, @_) } # This is the sample application. Change this to the path to your # database. (or use mysql or something) #BeerDB->set_database("dbi:SQLite:t/beerdb.db"); -BeerDB->set_database("dbi:mysql:beerdb"); +BeerDB->setup("dbi:mysql:beerdb"); + # Change this to the root of the web space. #BeerDB->config->{uri_base} = "http://localhost/beerdb/"; BeerDB->config->{uri_base} = "http://neo.trinity-house.org.uk/beerdb/"; +BeerDB->config->{rows_per_page} = 10; + # Handpumps should not show up. BeerDB->config->{display_tables} = [qw[beer brewery pub style]]; BeerDB::Brewery->untaint_columns( printable => [qw/name notes url/] );