Warn if authenticate doesn't return a value.

[maypole.git] / ex / BeerDB.pm

diff --git a/ex/BeerDB.pm b/ex/BeerDB.pm
index 26f8e94cd249197ff919a9746120421e09245235..9d9867dcd49af94cfbdff4b1ebbdd037c4988c38 100644 (file)
--- a/ex/BeerDB.pm
+++ b/ex/BeerDB.pm
@@ -1,5 +1,5 @@
 package BeerDB;
-use Maypole::Application;
+use Maypole::Application qw/-Debug/;
 use Class::DBI::Loader::Relationship;
 
 BEGIN {