summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/install_any.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index b7065a6eb..8da749fed 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -1889,6 +1889,7 @@ sub write_fstab {
}
my $clp_name = 'mdkinst.clp';
+sub clp_on_tmpfs() { "/tmp/$clp_name" }
sub clp_on_disk() { "$::prefix/tmp/$clp_name" }
sub move_clp_to_disk() {
@@ -1900,7 +1901,7 @@ sub move_clp_to_disk() {
run_program::run('losetup', '-r', $loop, clp_on_disk());
#- in $current_clp eq "/tmp/$clp_name"
- unlink "/tmp/$clp_name";
+ unlink clp_on_tmpfs();
}
#-###############################################################################