[Catalyst-commits] r9824 - Catalyst-Authentication-Credential-HTTP/1.000/branches/ntlm_support/lib/Catalyst/Authentication/Credential

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-04-24 14:32:58 +0100 (Fri, 24 Apr 2009)
New Revision: 9824

Modified:
   Catalyst-Authentication-Credential-HTTP/1.000/branches/ntlm_support/lib/Catalyst/Authentication/Credential/HTTP.pm
Log:
Going to comment that out for simplicity at the moment.


Modified: Catalyst-Authentication-Credential-HTTP/1.000/branches/ntlm_support/lib/Catalyst/Authentication/Credential/HTTP.pm
===================================================================
--- Catalyst-Authentication-Credential-HTTP/1.000/branches/ntlm_support/lib/Catalyst/Authentication/Credential/HTTP.pm	2009-04-24 13:32:08 UTC (rev 9823)
+++ Catalyst-Authentication-Credential-HTTP/1.000/branches/ntlm_support/lib/Catalyst/Authentication/Credential/HTTP.pm	2009-04-24 13:32:58 UTC (rev 9824)
@@ -63,10 +63,12 @@
         Catalyst::Exception->throw(__PACKAGE__ . " used with unsupported authentication type: " . $type);
     }
 
+    # FIXME - Uncomment.
+    #         Note - do all user classes actually support this??
     # check if the configured store supports cleartext passwords
-    if ( ($type eq 'ntlm' || $type eq 'digest') && not $self->realm->store->user_supports(qw/password clear/)) {
-        Catalyst::Exception->throw(__PACKAGE__ . " used with unsupported store (needs to support cleartext passwords)");
-    }
+    #if ( ($type eq 'ntlm' || $type eq 'digest') && not $self->realm->store->user_supports(qw/password clear/)) {
+    #    Catalyst::Exception->throw(__PACKAGE__ . " used with unsupported store (needs to support cleartext passwords)");
+    #}
 
     $self->type($type);
 }