[Reproducible-commits] [debhelper] 26/56: Dh_Lib.pm: Drop udeb_filename subroutine

Mattia Rizzolo mattia at mapreri.org
Sun Oct 4 17:06:16 UTC 2015


This is an automated email from the git hooks/post-receive script.

mapreri-guest pushed a commit to branch master
in repository debhelper.

commit 0e266010de6fb8413d95be2590954b3c5757fd01
Author: Niels Thykier <niels at thykier.net>
Date:   Sun Aug 30 19:18:40 2015 +0200

    Dh_Lib.pm: Drop udeb_filename subroutine
    
    Signed-off-by: Niels Thykier <niels at thykier.net>
---
 Debian/Debhelper/Dh_Lib.pm | 20 +-------------------
 debian/changelog           |  1 +
 doc/PROGRAMMING            |  2 --
 3 files changed, 2 insertions(+), 21 deletions(-)

diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index 83ad659..07c1d89 100644
--- a/Debian/Debhelper/Dh_Lib.pm
+++ b/Debian/Debhelper/Dh_Lib.pm
@@ -16,7 +16,7 @@ use vars qw(@EXPORT %dh);
 	    &autoscript &filearray &filedoublearray
 	    &getpackages &basename &dirname &xargs %dh
 	    &compat &addsubstvar &delsubstvar &excludefile &package_arch
-	    &is_udeb &udeb_filename &debhelper_script_subst &escape_shell
+	    &is_udeb &debhelper_script_subst &escape_shell
 	    &inhibit_log &load_log &write_log &commit_override_log
 	    &dpkg_architecture_value &sourcepackage &make_symlink
 	    &is_make_jobserver_unavailable &clean_jobserver_makeflags
@@ -971,24 +971,6 @@ sub is_udeb {
 	return $package_types{$package} eq 'udeb';
 }
 
-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
-	$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');
-}
-
 # Handles #DEBHELPER# substitution in a script; also can generate a new
 # script from scratch if none exists but there is a .debhelper file for it.
 sub debhelper_script_subst {
diff --git a/debian/changelog b/debian/changelog
index a718d82..f28a8b3 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -31,6 +31,7 @@ debhelper (9.20150811+unreleased) UNRELEASED; urgency=medium
     dpkg-deb getting everything but the extension correct
     (see #575059, #452273 for why it does not produce the
      correct extesion).  (Closes: #516721, #677353)
+  * Dh_Lib.pm: Drop now unused "udeb_filename" subroutine.
 
   [ Paul Tagliamonte ]
   * dh_gencontrol: Put debug debs back in the "debug" section.
diff --git a/doc/PROGRAMMING b/doc/PROGRAMMING
index 3b0bc13..945d192 100644
--- a/doc/PROGRAMMING
+++ b/doc/PROGRAMMING
@@ -260,8 +260,6 @@ excludefile($filename)
 is_udeb($package)
 	Returns true if the package is marked as a udeb in the control
 	file.
-udeb_filename($package)
-	Returns the filename of the udeb package.
 getpackages($type)
 	Returns a list of packages in the control file.
 	Pass "arch" or "indep" to specify arch-dependent or

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/debhelper.git



More information about the Reproducible-commits mailing list