[license-reconcile] 01/05: Add support for HTTPS in Format URL.
gregor herrmann
gregoa at debian.org
Mon Feb 22 23:20:55 UTC 2016
This is an automated email from the git hooks/post-receive script.
gregoa pushed a commit to branch master
in repository license-reconcile.
commit ab25b08d2d8e0d9841b839e07bc5b4de06c4ad3d
Author: gregor herrmann <gregoa at debian.org>
Date: Mon Feb 22 22:52:16 2016 +0100
Add support for HTTPS in Format URL.
Thanks: Petter Reinholdtsen for the bug report.
Closes: #815542
---
lib/Debian/LicenseReconcile/FormatSpec.pm | 1 +
t/02-format.t | 3 ++-
t/data/good-format-https | 1 +
3 files changed, 4 insertions(+), 1 deletion(-)
diff --git a/lib/Debian/LicenseReconcile/FormatSpec.pm b/lib/Debian/LicenseReconcile/FormatSpec.pm
index 2d0aa90..4a19051 100644
--- a/lib/Debian/LicenseReconcile/FormatSpec.pm
+++ b/lib/Debian/LicenseReconcile/FormatSpec.pm
@@ -8,6 +8,7 @@ use Readonly;
Readonly my %PERMITTED_FORMATS => (
'Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/'=>1,
+ 'Format: https://www.debian.org/doc/packaging-manuals/copyright-format/1.0/'=>1,
);
Readonly my $TEST => 'FormatSpec';
diff --git a/t/02-format.t b/t/02-format.t
index 9cd1e36..e7e10f5 100644
--- a/t/02-format.t
+++ b/t/02-format.t
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-use Test::More tests => 11;
+use Test::More tests => 12;
use Test::Deep;
use Debian::LicenseReconcile::Errors;
use Debian::LicenseReconcile::FormatSpec;
@@ -21,6 +21,7 @@ cmp_deeply(\@list, [
], 'initial state');
is(Debian::LicenseReconcile::FormatSpec->check(read_file('t/data/good-format')), 1, 'good format');
+is(Debian::LicenseReconcile::FormatSpec->check(read_file('t/data/good-format-https')), 1, 'good format (HTTPS)');
is(Debian::LicenseReconcile::Errors->how_many,1,'how many');
@list = Debian::LicenseReconcile::Errors->list;
cmp_deeply(\@list, [
diff --git a/t/data/good-format-https b/t/data/good-format-https
new file mode 100644
index 0000000..6a27195
--- /dev/null
+++ b/t/data/good-format-https
@@ -0,0 +1 @@
+Format: https://www.debian.org/doc/packaging-manuals/copyright-format/1.0/
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/license-reconcile.git
More information about the Pkg-perl-cvs-commits
mailing list