X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FPlugin%2FAuthentication%2FCredential%2FTypeKey.pm;h=9165678e0d2b2350b474bf83e75f76674c2b50da;hb=6f758b52c41f81819f15d2e4520c2d0e376d35ca;hp=a776633ef365f4e8e7c247525900fb333f8cd526;hpb=19c14a204cf2c7a0793a4c5e5234d7c0971b2455;p=catagits%2FCatalyst-Authentication-Credential-HTTP-Proxy.git diff --git a/lib/Catalyst/Plugin/Authentication/Credential/TypeKey.pm b/lib/Catalyst/Plugin/Authentication/Credential/TypeKey.pm index a776633..9165678 100644 --- a/lib/Catalyst/Plugin/Authentication/Credential/TypeKey.pm +++ b/lib/Catalyst/Plugin/Authentication/Credential/TypeKey.pm @@ -27,8 +27,8 @@ sub setup { my $typekey = Authen::TypeKey->new; - for (qw/expires key_cache key_url token version/) { - $typekey->$_( $config->{$_} || next ); + for (grep { exists $config->{$_} } qw/expires key_cache key_url token version/) { + $typekey->$_( $config->{$_} ); } $typekey;