diff options
author | Niels Thykier <niels@thykier.net> | 2016-06-14 18:38:02 +0000 |
---|---|---|
committer | Niels Thykier <niels@thykier.net> | 2016-06-15 19:17:10 +0000 |
commit | ea488551db0821b73af7f969db7373d2e1f06bb8 (patch) | |
tree | 5249ab0165832179a44dd04a2c269e4a74b0ee72 /dh_strip | |
parent | 01480c11661204b6833608317928a6365e8a4cc4 (diff) | |
download | debhelper-ea488551db0821b73af7f969db7373d2e1f06bb8.tar.gz |
dh_strip: Refactor a few lines
Signed-off-by: Niels Thykier <niels@thykier.net>
Diffstat (limited to 'dh_strip')
-rwxr-xr-x | dh_strip | 7 |
1 files changed, 2 insertions, 5 deletions
@@ -242,13 +242,13 @@ sub make_debug { # stripped. return unless get_file_type($file) =~ /not stripped/; - my ($base_file)=$file=~/^\Q$tmp\E(.*)/; my ($debug_path, $debug_build_id); if ($use_build_id && `LC_ALL=C readelf -n $file`=~ /^\s+Build ID: ([0-9a-f]{2})([0-9a-f]+)$/m) { $debug_path=$desttmp."/usr/lib/debug/.build-id/$1/$2.debug"; $debug_build_id="${1}${2}"; + push(@build_ids, $debug_build_id); } elsif ($use_build_id > 1) { # For dbgsyms, we need build-id (else it will not be @@ -256,6 +256,7 @@ sub make_debug { return; } else { + my ($base_file)=$file=~/^\Q$tmp\E(.*)/; $debug_path=$desttmp."/usr/lib/debug/".$base_file; } my $debug_dir=dirname($debug_path); @@ -270,10 +271,6 @@ sub make_debug { doit($objcopy, "--only-keep-debug", "--compress-debug-sections", $file, $debug_path); } - if ($use_build_id and defined($debug_build_id)) { - push(@build_ids, $debug_build_id); - } - # No reason for this to be executable. doit("chmod", "0644", $debug_path); return $debug_path; |