summaryrefslogtreecommitdiff
path: root/Debian/Dgit.pm
diff options
context:
space:
mode:
authorIan Jackson <ijackson@chiark.greenend.org.uk>2016-07-17 14:21:42 +0100
committerIan Jackson <ijackson@chiark.greenend.org.uk>2016-07-31 21:50:00 +0100
commit2fe42d36da42a62e8082d0d1c4c35943e8281e9e (patch)
tree49a6a4d9e795aa942adf2088d650d83bdaab0c2c /Debian/Dgit.pm
parent26f2213a36af62d526a41ad96caef7f3c4aa507a (diff)
Tag change: Declare intent in docs etc.
Provide debiantag_new as well as debiantag_old. Change the docs and an important comment. Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'Debian/Dgit.pm')
-rw-r--r--Debian/Dgit.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm
index 979dd42..fb983c1 100644
--- a/Debian/Dgit.pm
+++ b/Debian/Dgit.pm
@@ -19,7 +19,7 @@ BEGIN {
$VERSION = 1.00;
@ISA = qw(Exporter);
@EXPORT = qw(setup_sigwarn
- debiantag_old server_branch server_ref
+ debiantag_old debiantag_new server_branch server_ref
stat_exists link_ltarget
hashfile
fail ensuredir executable_on_path
@@ -131,6 +131,12 @@ sub debiantag_old ($$) {
return "$distro/$v";
}
+sub debiantag_new ($$) {
+ my ($v,$distro) = @_;
+ $v =~ y/~:/_%/;
+ return "archive/$distro/$v";
+}
+
sub server_branch ($) { return "$branchprefix/$_[0]"; }
sub server_ref ($) { return "refs/".server_branch($_[0]); }