diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2005-08-10 14:20:52 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2005-08-10 14:20:52 +0000 |
commit | 54af75fc5ae98319025da96056938cd6918f320e (patch) | |
tree | b75dc25a1bbf73e6aa026d666e8ce2b33dbcdff8 /perl-install/install_any.pm | |
parent | 8552e9ff99f2e28666f59ac4e73f7e963e13eeba (diff) | |
download | drakx-backup-do-not-use-54af75fc5ae98319025da96056938cd6918f320e.tar drakx-backup-do-not-use-54af75fc5ae98319025da96056938cd6918f320e.tar.gz drakx-backup-do-not-use-54af75fc5ae98319025da96056938cd6918f320e.tar.bz2 drakx-backup-do-not-use-54af75fc5ae98319025da96056938cd6918f320e.tar.xz drakx-backup-do-not-use-54af75fc5ae98319025da96056938cd6918f320e.zip |
create clp_on_tmpfs() for future use
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r-- | perl-install/install_any.pm | 3 |
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(); } #-############################################################################### |