From: Aaron Trevena Date: Mon, 11 Jul 2005 11:14:33 +0000 (+0000) Subject: rest of BeerDB.pm fix X-Git-Tag: 2.10~10 X-Git-Url: https://git.decadent.org.uk/gitweb/?p=maypole.git;a=commitdiff_plain;h=61b54f430fb90f1f0aceecf243221dddb8a9e60e rest of BeerDB.pm fix git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@354 48953598-375a-da11-a14b-00016c27c3ee --- diff --git a/ex/BeerDB.pm b/ex/BeerDB.pm index 1e4291a..53197cc 100644 --- a/ex/BeerDB.pm +++ b/ex/BeerDB.pm @@ -25,10 +25,13 @@ BEGIN { # Give it a name. BeerDB->config->application_name('The Beer Database'); -# 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/"); +# Change this to the root of the web site for your maypole application. +BeerDB->config->uri_base( $ENV{BEERDB_BASE} || "http://localhost/beerdb/" ); +# Change this to the htdoc root for your maypole application. +BeerDB->config->template_root( $ENV{BEERDB_TEMPLATE_ROOT} ) if $ENV{BEERDB_TEMPLATE_ROOT}; + +# Specify the rows per page in search results, lists, etc : 10 is a nice round number BeerDB->config->rows_per_page(10); # Handpumps should not show up.