diff options
Diffstat (limited to 'Debian/Dgit.pm')
| -rw-r--r-- | Debian/Dgit.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm index 787e506..1cd765d 100644 --- a/Debian/Dgit.pm +++ b/Debian/Dgit.pm @@ -43,6 +43,7 @@ BEGIN { dep14_version_mangle debiantags debiantag_old debiantag_new debiantag_maintview + upstreamversion stripepoch source_file_leafname is_orig_file_of_p_v server_branch server_ref stat_exists link_ltarget @@ -231,6 +232,12 @@ sub stripepoch ($) { return $vsn; } +sub upstreamversion ($) { + my ($vsn) = @_; + $vsn =~ s/-[^-]+$//; + return $vsn; +} + sub source_file_leafname ($$$) { my ($package,$vsn,$sfx) = @_; return "${package}_".(stripepoch $vsn).$sfx |