|
@ -279,13 +279,13 @@ if ( -d $global_yard_templates ) { |
|
|
} |
|
|
} |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
|
# $HOME/.gbootroot/yard/replacements |
|
|
# $HOME/.gbootroot/yard/Replacements |
|
|
home_builder($home_yard_replacements); |
|
|
home_builder($home_yard_replacements); |
|
|
if (-d $global_yard_replacements) { |
|
|
if (-d $global_yard_replacements) { |
|
|
if (-d $home_yard_replacements) { |
|
|
if (-d $home_yard_replacements) { |
|
|
find sub { ( my $replacement = |
|
|
find sub { ( my $replacement = |
|
|
$File::Find::name ) =~ s/$global_yard_replacements\///; |
|
|
$File::Find::name ) =~ s/$global_yard_replacements\///; |
|
|
if (!-e "$home_yard_replacements/$File::Find::name") { |
|
|
if (!-e "$home_yard_replacements/$replacement") { |
|
|
system "cp -a $File::Find::name $home_yard_replacements/$replacement > /dev/null 2>&1"; |
|
|
system "cp -a $File::Find::name $home_yard_replacements/$replacement > /dev/null 2>&1"; |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
@ -1391,6 +1391,8 @@ sub Generate { |
|
|
$ars->{template_dir} = $template_dir; # static right now. |
|
|
$ars->{template_dir} = $template_dir; # static right now. |
|
|
ars($ars); |
|
|
ars($ars); |
|
|
|
|
|
|
|
|
|
|
|
print $ars->{tmp}, "\n"; return; |
|
|
|
|
|
|
|
|
my $template = $ars->{template}; |
|
|
my $template = $ars->{template}; |
|
|
$root_device = $ars->{device}; |
|
|
$root_device = $ars->{device}; |
|
|
$root_filename = $ars->{filename}; |
|
|
$root_filename = $ars->{filename}; |
|
|