summaryrefslogtreecommitdiff
path: root/fml
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-07-15 08:20:25 +0000
committerfukachan <fukachan>2001-07-15 08:20:25 +0000
commitb54c2aacced4437e6b2ab09461bd3649a242d7aa (patch)
tree2bed8c9decbcdcb1807a7a27547b58d42ad654b1 /fml
parent5065fcb82944a5b0cfcb88b100bf3f51666b5a51 (diff)
downloadfml8-b54c2aacced4437e6b2ab09461bd3649a242d7aa.tar.gz
fml8-b54c2aacced4437e6b2ab09461bd3649a242d7aa.tar.bz2
fml8-b54c2aacced4437e6b2ab09461bd3649a242d7aa.zip
use _pid (s/pid/_pid/) in configuration
Diffstat (limited to 'fml')
-rw-r--r--fml/lib/FML/Config.pm4
-rw-r--r--fml/lib/FML/Log.pm4
2 files changed, 4 insertions, 4 deletions
diff --git a/fml/lib/FML/Config.pm b/fml/lib/FML/Config.pm
index d59c71fe..8ddcd604 100644
--- a/fml/lib/FML/Config.pm
+++ b/fml/lib/FML/Config.pm
@@ -1,7 +1,7 @@
#-*- perl -*-
# Copyright (C) 2000-2001 Ken'ichi Fukamachi
#
-# $FML: Config.pm,v 1.32 2001/07/15 04:00:26 fukachan Exp $
+# $FML: Config.pm,v 1.33 2001/07/15 08:14:44 fukachan Exp $
#
package FML::Config;
@@ -103,7 +103,7 @@ sub new
{
my ($self, $args) = @_;
- unless (defined %_fml_config) { %_fml_config = ( pid => $$ );}
+ unless (defined %_fml_config) { %_fml_config = ( _pid => $$ );}
# prepare the tied hash to %_fml_config;
# to support $config->{ variable } syntax.
diff --git a/fml/lib/FML/Log.pm b/fml/lib/FML/Log.pm
index 1c57ccc4..30e3f268 100644
--- a/fml/lib/FML/Log.pm
+++ b/fml/lib/FML/Log.pm
@@ -2,7 +2,7 @@
#
# Copyright (C) 2000 Ken'ichi Fukamachi
#
-# $FML: Log.pm,v 1.10 2001/04/03 09:45:40 fukachan Exp $
+# $FML: Log.pm,v 1.11 2001/05/27 14:27:53 fukachan Exp $
#
package FML::Log;
@@ -107,7 +107,7 @@ sub Log
}
else {
my $name = $0; $name =~ s@.*/@@;
- my $iam = $name."[". $config->{ pid } ."]";
+ my $iam = $name."[". $config->{ _pid } ."]";
print $fh $rdate->{'log_file_style'}, " ", $iam, " ", $mesg;
print $fh "\n";
}