diff Lib/IMPL/Security/Auth.pm @ 194:4d0e1962161c

Replaced tabs with spaces IMPL::Web::View - fixed document model, new features (control classes, document constructor parameters)
author cin
date Tue, 10 Apr 2012 20:08:29 +0400
parents d1676be8afcc
children 6d8092d8ce1b
line wrap: on
line diff
--- a/Lib/IMPL/Security/Auth.pm	Tue Apr 10 08:13:22 2012 +0400
+++ b/Lib/IMPL/Security/Auth.pm	Tue Apr 10 20:08:29 2012 +0400
@@ -3,9 +3,9 @@
 use Digest::MD5 qw(md5_hex);
 
 use constant {
-	AUTH_SUCCESS => 1,
-	AUTH_INCOMPLETE => 2,
-	AUTH_FAIL => 3	
+    AUTH_SUCCESS => 1,
+    AUTH_INCOMPLETE => 2,
+    AUTH_FAIL => 3    
 };
 
 use parent qw(Exporter);
@@ -21,21 +21,21 @@
 }
 
 sub DoAuth {
-	die new IMPL::NotImplementedException;
+    die new IMPL::NotImplementedException;
 }
 
 sub ValidateSession {
-	die new IMPL::NotImplementedException;
+    die new IMPL::NotImplementedException;
 }
 
 sub isTrusted {
-	0;
+    0;
 }
 
 sub Create {
-	my ($self,%args) = @_;
-	
-	return $self->new($self->CreateSecData(%args));
+    my ($self,%args) = @_;
+    
+    return $self->new($self->CreateSecData(%args));
 }
 
 1;