mirror of
https://github.com/fspc/gbootroot.git
synced 2026-09-08 12:51:40 -04: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:
+35
-5
@@ -1210,9 +1210,24 @@ sub copy_strip_file {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
else { # fallback just in case
|
else { # fallback just in case
|
||||||
# Normal copy, no strip
|
|
||||||
info(1, "Copying $from to $to\n");
|
# Normal copy, no strip
|
||||||
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");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
# Copy file perms and owner
|
# Copy file perms and owner
|
||||||
@@ -1240,9 +1255,24 @@ sub copy_strip_file {
|
|||||||
|
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
|
|
||||||
# Normal copy, no strip
|
# Normal copy, no strip
|
||||||
info(1, "Copying $from to $to\n");
|
if ( $from !~ m,/Replacements/, ) {
|
||||||
sys("cp -a $from $to");
|
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");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user