diff options
author | Olivier Blin <oblin@mandriva.com> | 2007-12-13 16:30:13 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2007-12-13 16:30:13 +0000 |
commit | 04234d4d66b8a6e07242e7bc320b146fcbce8d34 (patch) | |
tree | dcbe0602e1effda0b73b3c6695bcfcfab89a19c1 /draklive | |
parent | f26dc0fd1215787723540cb9dc25f841b1f89c59 (diff) | |
download | drakiso-04234d4d66b8a6e07242e7bc320b146fcbce8d34.tar drakiso-04234d4d66b8a6e07242e7bc320b146fcbce8d34.tar.gz drakiso-04234d4d66b8a6e07242e7bc320b146fcbce8d34.tar.bz2 drakiso-04234d4d66b8a6e07242e7bc320b146fcbce8d34.tar.xz drakiso-04234d4d66b8a6e07242e7bc320b146fcbce8d34.zip |
chomp filename
Diffstat (limited to 'draklive')
-rwxr-xr-x | draklive | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -415,7 +415,8 @@ sub inst_initrd_bin { my ($root, $initrd_tree, $bin) = @_; cp_f($root . $bin, $initrd_tree . '/bin/'); foreach my $file (`chroot $root ldd $bin | awk '/\\// {if(\$2 == "=>") {print \$3} else {print \$1}}'`) { - my ($lib_prefix, $filename) = chomp_($file) =~ m|/(lib[^/]*).*/([^/]+)$| or next; + chomp $file; + my ($lib_prefix, $filename) = $file =~ m|/(lib[^/]*).*/([^/]+)$| or next; my $dest = $initrd_tree . '/' . $lib_prefix . '/' . $filename; mkdir_p($initrd_tree . '/' . $lib_prefix); cp_f($root . $file, $dest) if !-f $dest; |