From ccf0335a3414468d96e72e70ec879026a59bc965 Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel.baumann@progress-linux.org>
Date: Tue, 16 Apr 2024 21:31:31 +0200
Subject: Adding debian version 2:1.20~2.

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
---
 debian/helpers/getver.pl | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 debian/helpers/getver.pl

(limited to 'debian/helpers')

diff --git a/debian/helpers/getver.pl b/debian/helpers/getver.pl
new file mode 100755
index 0000000..27a87b4
--- /dev/null
+++ b/debian/helpers/getver.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+
+# Extract upstream version from version in changelog.
+
+use warnings;
+use strict;
+
+use Dpkg::Changelog::Parse;
+
+my $fields = changelog_parse();
+my $v = $fields->{Version}->version();
+$v =~ /^([0-9]+\.[0-9]+).*/ or die 'INVALID VERSION! (needs X.Y)';
+
+printf("%s\n", $1);
-- 
cgit v1.2.3