Make User::Hash->supports check less fatal
Yuval Kogman [Sun, 4 Dec 2005 11:27:49 +0000 (11:27 +0000)]
lib/Catalyst/Plugin/Authentication/User/Hash.pm

index fb3f543..962e91a 100644 (file)
@@ -64,8 +64,7 @@ sub supports {
 
     # traverse the feature list,
     for (@spec) {
-        die "bad feature spec: @spec"
-          if ref($cursor) ne "HASH";
+        return if ref($cursor) ne "HASH";
         $cursor = $cursor->{$_};
     }