Mercurial > pub > Impl

diff Lib/IMPL/Security/Auth/Simple.pm @ 87:6d3bca490556

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
small fixes in the security moodules
author wizard
date Mon, 19 Apr 2010 23:20:46 +0400
parents 077357224bec
children 4267a2ac3d46
line wrap: on
line diff
--- a/Lib/IMPL/Security/Auth/Simple.pm	Mon Apr 19 02:38:18 2010 +0400
+++ b/Lib/IMPL/Security/Auth/Simple.pm	Mon Apr 19 23:20:46 2010 +0400
@@ -15,7 +15,7 @@
 sub CTOR {
 	my ($this,$secData) = @_;
 	
-	my ($passImg,$cookie) = split /|/,$secData;
+	my ($passImg,$cookie) = split /\|/,$secData;
 	
 	$this->_passwordImage($passImg);
 	$this->_sessionCookie($cookie);
@@ -64,7 +64,7 @@
 	
 	die new IMPL::InvalidArgumentException("The parameter is required",'password') unless $args{password};
 	
-	return md5_hex($args{password});
+	return Digest::MD5::md5_hex($args{password});
 }
 
 sub SecDataArgs {