Update of /cvsroot/sandweb/sandweb/lib/SandWeb/Auth
In directory sc8-pr-cvs1:/tmp/cvs-serv15829/SandWeb/Auth
Modified Files:
FlatFile.pm
Log Message:
beginning of POD docs
Index: FlatFile.pm
===================================================================
RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Auth/FlatFile.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -U2 -r1.7 -r1.8
--- FlatFile.pm 19 Jun 2002 07:08:59 -0000 1.7
+++ FlatFile.pm 5 Jan 2003 08:59:08 -0000 1.8
@@ -1,7 +1,15 @@
# SandWeb FlatFile authentication module
#
-# This class verifies MD5 passwords for a given username, and returns
-# true if the user if authentic, false if not.
-#
+
+=pod
+=head1
+
+SandWeb::Auth::FlatFile
+
+This class verifies MD5 passwords for a given username, and returns
+true if the user if authentic, false if not.
+
+=cut
+
# SandWeb (Web-based VCS client)
#
@@ -24,8 +32,30 @@
#
+=head1
+
+part of the SandWeb::Auth::FlatFile package
+
+=cut
+
package SandWeb::Auth::FlatFile;
+=head1
+
+uses Digest::MD5
+
+=cut
+
use Digest::MD5 qw(md5_hex);
+=head1
+
+Methods
+
+new
+
+ instantiates a new object
+
+=cut
+
sub new {
my $class = shift;
@@ -39,4 +69,12 @@
return $self;
}
+
+=head1
+
+verify_password
+
+ compares a given password to the one stored
+
+=cut
sub verify_password {
|
