diff options
| author | fukachan <fukachan> | 2001-02-05 10:19:18 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-02-05 10:19:18 +0000 |
| commit | 3a0379280ab079dab1ba365bdedd027ca4115924 (patch) | |
| tree | f34be5135c001b3abfe429d3a93db6011999a520 | |
| parent | fd02017d1a499822ac12ab5038e0cb6fafebbb2a (diff) | |
| download | fml8-3a0379280ab079dab1ba365bdedd027ca4115924.tar.gz fml8-3a0379280ab079dab1ba365bdedd027ca4115924.tar.bz2 fml8-3a0379280ab079dab1ba365bdedd027ca4115924.zip | |
define $config->{pid} in initialize phase
| -rw-r--r-- | fml/lib/FML/Config.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fml/lib/FML/Config.pm b/fml/lib/FML/Config.pm index 59e11719..2b0ca65d 100644 --- a/fml/lib/FML/Config.pm +++ b/fml/lib/FML/Config.pm @@ -16,7 +16,7 @@ sub new { my ($self, $args) = @_; - unless (defined %_fml_config) { %_fml_config = ();} + unless (defined %_fml_config) { %_fml_config = ( pid => $$ );} my $me = \%_fml_config; # import variables |