From 763567374b3430c726dc2fdfb38362fb960ce1eb Mon Sep 17 00:00:00 2001 From: Simon Cozens Date: Thu, 5 Aug 2004 10:00:38 +0000 Subject: [PATCH] Allow multiple apps on the same site. git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@165 48953598-375a-da11-a14b-00016c27c3ee --- lib/Maypole.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Maypole.pm b/lib/Maypole.pm index b55f7b9..411b07b 100644 --- a/lib/Maypole.pm +++ b/lib/Maypole.pm @@ -22,7 +22,8 @@ sub setup { # Naughty. *{$calling_class."::handler"} = sub { Maypole::handler($calling_class, @_) }; } - my $config = $calling_class->config; + my $config = {}; + $calling_class->config($config); $config->{model} ||= "Maypole::Model::CDBI"; $config->{model}->require; die "Couldn't load the model class $config->{model}: $@" if $@; -- 2.39.2