1
0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-23 09:03:23 -05:00

If Replacements are symlinks, the actual file linked to is copied, this helps

with the new structure of allowing symlinks in Replacements.
This commit is contained in:
freesource 2001-11-15 07:48:23 +00:00
parent c25f039c0c
commit 8604aa6dd0

View File

@ -1210,9 +1210,24 @@ sub copy_strip_file {
}
}
else { # fallback just in case
# Normal copy, no strip
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
# Normal copy, no strip
if ( $from !~ m,/Replacements/, ) {
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
}
else {
if ( !-l $from ) {
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
}
else {
$from = readlink($from);
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
}
}
}
# Copy file perms and owner
@ -1240,9 +1255,24 @@ sub copy_strip_file {
}
else {
# Normal copy, no strip
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
if ( $from !~ m,/Replacements/, ) {
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
}
else {
if ( !-l $from ) {
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
}
else {
$from = readlink($from);
info(1, "Copying $from to $to\n");
sys("cp -a $from $to");
}
}
}
}