summaryrefslogtreecommitdiff
path: root/fml
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-02-24 08:25:40 +0000
committerfukachan <fukachan>2002-02-24 08:25:40 +0000
commit9fa8715f9e8c91fe1fe0e8a20a9e62aab94337c0 (patch)
treefed9e07c68e6fc2bc73dad9673fd61a8ceab8b09 /fml
parente2c45c09c3c016b24bce86c14f4df39cec870bc2 (diff)
downloadfml8-9fa8715f9e8c91fe1fe0e8a20a9e62aab94337c0.tar.gz
fml8-9fa8715f9e8c91fe1fe0e8a20a9e62aab94337c0.tar.bz2
fml8-9fa8715f9e8c91fe1fe0e8a20a9e62aab94337c0.zip
replace $fml_owner and $ml_home_dir.
Diffstat (limited to 'fml')
-rw-r--r--fml/lib/FML/Config/Convert.pm10
1 files changed, 9 insertions, 1 deletions
diff --git a/fml/lib/FML/Config/Convert.pm b/fml/lib/FML/Config/Convert.pm
index 6eaa3249..18171f5a 100644
--- a/fml/lib/FML/Config/Convert.pm
+++ b/fml/lib/FML/Config/Convert.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: Convert.pm,v 1.3 2001/12/22 09:21:05 fukachan Exp $
+# $FML: Convert.pm,v 1.4 2001/12/22 14:23:40 fukachan Exp $
#
@@ -82,6 +82,10 @@ sub _replace
{
my ($buf, $config) = @_;
+ if (defined $config->{ fml_owner }) {
+ $buf =~ s/__fml_owner__/$config->{ fml_owner }/g;
+ }
+
if (defined $config->{ ml_name }) {
$buf =~ s/__ml_name__/$config->{ ml_name }/g;
}
@@ -94,6 +98,10 @@ sub _replace
$buf =~ s/__libexec_dir__/$config->{ libexec_dir }/g;
}
+ if (defined $config->{ ml_home_dir }) {
+ $buf =~ s/__ml_home_dir__/$config->{ ml_home_dir }/g;
+ }
+
if (defined $config->{ ml_home_prefix }) {
$buf =~ s/__ml_home_prefix__/$config->{ ml_home_prefix }/g;
}