--- trunk/lib/Frey/Config.pm	2008/11/06 16:43:41	321
+++ trunk/lib/Frey/Config.pm	2008/11/06 17:56:59	322
@@ -48,8 +48,8 @@
 }
 
 sub config {
-	my $self = shift;
-	my $key = shift || ref($self);
+	my ( $self, $key ) = @_;
+	$key ||= ref($self);
 	warn "## config $key" if $self->debug;
 	$self->load_config unless defined %config;
 	#confess "$key doesn't exist in config" unless defined $config{ $key };