Mercurial > pub > Impl

diff Lib/IMPL/Web/Security.pm @ 391:2287c72f303a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
code cleanup
author cin
date Thu, 13 Feb 2014 20:17:22 +0400
parents 63709a4e6da0
children 69a1f1508696
line wrap: on
line diff
--- a/Lib/IMPL/Web/Security.pm	Wed Feb 12 18:02:03 2014 +0400
+++ b/Lib/IMPL/Web/Security.pm	Thu Feb 13 20:17:22 2014 +0400
@@ -20,7 +20,9 @@
 };
 
 sub AuthUser {
-    my ($this,$name,$package,$challenge) = @_;
+    my ($this,$name,$challenge,$package) = @_;
+    
+    $package ||= $this->interactiveAuthPackage;
     
     my $user = $this->users->GetById($name)
         or return {