diff options
author | Niels Thykier <niels@thykier.net> | 2015-04-03 23:16:26 +0200 |
---|---|---|
committer | Niels Thykier <niels@thykier.net> | 2015-05-02 10:29:40 +0200 |
commit | 1752b7a052cabcdcf1b42e42ff30c1b6d3969510 (patch) | |
tree | 12bbcc20b61825090053c10348ae99b33185e46f /Debian | |
parent | fdf61f73fcdca21c5bf18a64b05288af6086a170 (diff) | |
download | debhelper-1752b7a052cabcdcf1b42e42ff30c1b6d3969510.tar.gz |
Add experimental .ddeb support
Signed-off-by: Niels Thykier <niels@thykier.net>
Diffstat (limited to 'Debian')
-rw-r--r-- | Debian/Debhelper/Dh_Lib.pm | 26 |
1 files changed, 20 insertions, 6 deletions
diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm index 4740f0e3..c0da2307 100644 --- a/Debian/Debhelper/Dh_Lib.pm +++ b/Debian/Debhelper/Dh_Lib.pm @@ -21,7 +21,7 @@ use vars qw(@ISA @EXPORT %dh); &dpkg_architecture_value &sourcepackage &make_symlink &is_make_jobserver_unavailable &clean_jobserver_makeflags &cross_command &set_buildflags &get_buildoption - &install_dh_config_file + &install_dh_config_file &ddeb_filename &install_file &install_prog &install_lib &install_dir ); @@ -944,15 +944,29 @@ sub is_udeb { return $package_types{$package} eq 'udeb'; } -# Generates the filename that is used for a udeb package. -sub udeb_filename { - my $package=shift; - +sub _xdeb_filename { + my ($package, $ext, $actual_name) = @_; + my $filearch=package_arch($package); isnative($package); # side effect my $version=$dh{VERSION}; $version=~s/^[0-9]+://; # strip any epoch - return "${package}_${version}_$filearch.udeb"; + $actual_name = $package if not defined($actual_name); + return "${actual_name}_${version}_${filearch}.${ext}"; +} + +# Generates the filename that is used for a udeb package. +sub udeb_filename { + my ($package) = @_; + + return _xdeb_filename($package, 'udeb'); +} + +# Generates the filename that is used for a ddeb package. +sub ddeb_filename { + my ($package) = @_; + + return _xdeb_filename($package, 'ddeb', "${package}-dbgsym"); } # Handles #DEBHELPER# substitution in a script; also can generate a new |