X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=ex%2Ffancy_example%2FBeerDB.pm;h=cb72574e1b9af564784e01740198497f39d82f2a;hb=1c8db728a3fb5adb4f0ea876ea1316457700edf8;hp=593851f16f2ab484524611c26aa0e1e6d55e2b11;hpb=7bb021648c28d2f70ec2853f0d01dd49c6437460;p=maypole.git

diff --git a/ex/fancy_example/BeerDB.pm b/ex/fancy_example/BeerDB.pm
index 593851f..cb72574 100644
--- a/ex/fancy_example/BeerDB.pm
+++ b/ex/fancy_example/BeerDB.pm
@@ -44,7 +44,6 @@ BeerDB::Beer->untaint_columns(
 BeerDB::Pub->untaint_columns(printable => [qw/name notes url/]);
 BeerDB::Drinker->untaint_columns( printable => [qw/handle created/] );
 BeerDB::Pint->untaint_columns( printable => [qw/date_and_time/]);
-BeerDB::Person->untaint_columns( printable => [qw/first_name sur_name dob username password email/]);
 
 
 # Required Fields
@@ -58,8 +57,6 @@ BeerDB->config->{person}{required_cols} = [qw/first_name sur_name dob email/];
 
 # Columns to display 
 sub BeerDB::Handpump::display_columns { qw/pub beer/ }
-sub BeerDB::Pint::display_columns { qw/drinker handpump/ }
-sub BeerDB::Person::display_columns { qw/first_name last_name dob email/ }
 
 BeerDB->config->{loader}->relationship($_) for (
     "a brewery produces beers",
@@ -77,4 +74,5 @@ sub BeerDB::Handpump::stringify_self {
 	return $self->beer . " @ " . $self->pub;
 }
 
+
 1;