s/traditional/fml4_compatible/

add comments on FML::Config and FML::Credential

1 files changed, 8 insertions, 3 deletions

diff --git a/fml/lib/FML/Log.pm b/fml/lib/FML/Log.pm
index 1fa85416..0a33ab50 100644
--- a/fml/lib/FML/Log.pm
+++ b/fml/lib/FML/Log.pm
@@ -47,7 +47,7 @@ for example, log files, syslog() (not yet implemented).
 
 =head2 Log( $message [, $args])
 
-The argument is the message to log.
+The required argument is the message to log.
 You can specify C<log_file>, C<facility> and C<level> as an optional.
 
     $args = {
@@ -56,6 +56,10 @@ You can specify C<log_file>, C<facility> and C<level> as an optional.
        level    => $level,
    };
 
+This routine depends on C<FML::Config> and C<FML::Credential>.
+$config->{ log_format_type } defines the format sytle.
+C<sender> to log is taken from C<FML::Credential> object.
+
 =cut
 
 
@@ -88,7 +92,7 @@ sub Log
     my $sender = FML::Credential->sender;
 
     if (defined $fh) {
-	if ($style eq 'traditional') {
+	if ($style eq 'fml4_compatible') {
 	    print $fh $rdate->{'log_file_style'}, " ", $mesg;
 	    print $fh " ($sender)" if defined $sender;
 	    print $fh "\n";
@@ -109,7 +113,8 @@ sub Log
 =head1 SEE ALSO
 
 L<FML::Date>, 
-L<FML::Config>
+L<FML::Config>,
+L<FML::Credential>,
 
 =head1 AUTHOR