diff options
| author | fukachan <fukachan> | 2001-02-17 07:39:38 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-02-17 07:39:38 +0000 |
| commit | 7cf3623e7e1599cde7977fa3beac9a18dc3ed4d6 (patch) | |
| tree | 59fe546e8794c77e1f8b077d7c8ca223134b1ff8 /fml/lib/FML | |
| parent | b55b073fbb698b922661f4f78ab80faaf8cbe071 (diff) | |
| download | fml8-7cf3623e7e1599cde7977fa3beac9a18dc3ed4d6.tar.gz fml8-7cf3623e7e1599cde7977fa3beac9a18dc3ed4d6.tar.bz2 fml8-7cf3623e7e1599cde7977fa3beac9a18dc3ed4d6.zip | |
move Bootstrap() latter part from libexec/loader to libexec/proces_switch.
"fmldoc" is a "perldoc" wrapper to show fml perl modules
Diffstat (limited to 'fml/lib/FML')
| -rw-r--r-- | fml/lib/FML/Process/Configure.pm | 2 | ||||
| -rw-r--r-- | fml/lib/FML/Process/Kernel.pm | 3 |
2 files changed, 3 insertions, 2 deletions
diff --git a/fml/lib/FML/Process/Configure.pm b/fml/lib/FML/Process/Configure.pm index 0101cd8d..bbcce69f 100644 --- a/fml/lib/FML/Process/Configure.pm +++ b/fml/lib/FML/Process/Configure.pm @@ -52,7 +52,7 @@ sub run $curproc->_show_conf($args); } elsif ($myname eq 'fmldoc') { - exec 'perldoc', @$argv; + exec 'perldoc', '-v', @$argv; } else { $curproc->lock(); diff --git a/fml/lib/FML/Process/Kernel.pm b/fml/lib/FML/Process/Kernel.pm index 397958c5..f260e0d8 100644 --- a/fml/lib/FML/Process/Kernel.pm +++ b/fml/lib/FML/Process/Kernel.pm @@ -30,7 +30,8 @@ sub new my ($cfargs) = {}; # import variables - my (@import_vars) = qw(ml_home_dir ml_home_prefix); + my (@import_vars) = qw(ml_home_prefix); + push(@import_vars, 'ml_home_dir') if $args->{ need_ml_name }; for my $var (@import_vars) { if ($args->{ $var }) { $cfargs->{ $var } = $args->{ $var }; |