forked from pool/perl-Test-Strict
Compare commits
3 Commits
Author | SHA256 | Date | |
---|---|---|---|
2c9c9758a0 | |||
a3e65abc28 | |||
054425f874 |
BIN
Test-Strict-0.52.tar.gz
(Stored with Git LFS)
BIN
Test-Strict-0.52.tar.gz
(Stored with Git LFS)
Binary file not shown.
3
Test-Strict-0.54.tar.gz
Normal file
3
Test-Strict-0.54.tar.gz
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
version https://git-lfs.github.com/spec/v1
|
||||||
|
oid sha256:f6807517823a90a96b40deeaed9aa080082ded4b50a51204f5be1e7ce774c85c
|
||||||
|
size 20923
|
@@ -5,7 +5,7 @@
|
|||||||
# - source1
|
# - source1
|
||||||
# - source2
|
# - source2
|
||||||
patches:
|
patches:
|
||||||
test-perl-5.38.patch: -p1 PATCH-FIX-UPSTREAM test-perl-5.38.patch gh#manwar/Test-Strict#33 -- Don't simultaneously test -c and -v switches
|
# test-perl-5.38.patch: -p1 PATCH-FIX-UPSTREAM test-perl-5.38.patch gh#manwar/Test-Strict#33 -- Don't simultaneously test -c and -v switches
|
||||||
# foo.patch: -p1
|
# foo.patch: -p1
|
||||||
# bar.patch:
|
# bar.patch:
|
||||||
#preamble: |-
|
#preamble: |-
|
||||||
@@ -18,4 +18,10 @@ patches:
|
|||||||
#license: SUSE-NonFree
|
#license: SUSE-NonFree
|
||||||
#skip_noarch: 1
|
#skip_noarch: 1
|
||||||
#custom_build: -
|
#custom_build: -
|
||||||
|
|
||||||
|
custom_test: |
|
||||||
|
# generated by find-debuginfo in current Tumblweeed, not sure why or how to disable that
|
||||||
|
rm -f debugfiles.list debuglinks.list debugsourcefiles.list debugsources.list elfbins.list
|
||||||
|
make test
|
||||||
|
|
||||||
#./Build build flags=%{?_smp_mflags} --myflag
|
#./Build build flags=%{?_smp_mflags} --myflag
|
||||||
|
@@ -1,3 +1,27 @@
|
|||||||
|
-------------------------------------------------------------------
|
||||||
|
Sat Apr 19 14:56:43 UTC 2025 - Tina Müller <tina.mueller@suse.com>
|
||||||
|
|
||||||
|
- Remove files generated by find-debuginfo before testing; it was
|
||||||
|
breaking t/93-checkmanifest.t, detecting unexpected files
|
||||||
|
|
||||||
|
-------------------------------------------------------------------
|
||||||
|
Tue Sep 24 19:56:57 UTC 2024 - Tina Müller <tina.mueller@suse.com>
|
||||||
|
|
||||||
|
- Remove test-perl-5.38.patch (fixed upstream)
|
||||||
|
|
||||||
|
-------------------------------------------------------------------
|
||||||
|
Thu Jul 25 05:30:47 UTC 2024 - Tina Müller <timueller+perl@suse.de>
|
||||||
|
|
||||||
|
- updated to 0.540.0 (0.54)
|
||||||
|
see /usr/share/doc/packages/perl-Test-Strict/Changes
|
||||||
|
|
||||||
|
0.54 2024-07-24 17:45:00 MANWAR
|
||||||
|
- Fix skipping of .git, .svn, and CVS directories, thanks @haarg.
|
||||||
|
|
||||||
|
0.53 2024-07-22 13:30:00 MANWAR
|
||||||
|
- Don't simultaneously test -c and -v switches (PR #33), thanks @jkeenan.
|
||||||
|
- Fixed manifest check (PR #35), thanks @haarg.
|
||||||
|
|
||||||
-------------------------------------------------------------------
|
-------------------------------------------------------------------
|
||||||
Thu Aug 3 12:57:32 UTC 2023 - Dominique Leuenberger <dimstar@opensuse.org>
|
Thu Aug 3 12:57:32 UTC 2023 - Dominique Leuenberger <dimstar@opensuse.org>
|
||||||
|
|
||||||
|
@@ -1,7 +1,7 @@
|
|||||||
#
|
#
|
||||||
# spec file for package perl-Test-Strict
|
# spec file for package perl-Test-Strict
|
||||||
#
|
#
|
||||||
# Copyright (c) 2023 SUSE LLC
|
# Copyright (c) 2025 SUSE LLC
|
||||||
#
|
#
|
||||||
# All modifications and additions to the file contributed by third parties
|
# All modifications and additions to the file contributed by third parties
|
||||||
# remain the property of their copyright owners, unless otherwise agreed
|
# remain the property of their copyright owners, unless otherwise agreed
|
||||||
@@ -18,21 +18,23 @@
|
|||||||
|
|
||||||
%define cpan_name Test-Strict
|
%define cpan_name Test-Strict
|
||||||
Name: perl-Test-Strict
|
Name: perl-Test-Strict
|
||||||
Version: 0.52
|
Version: 0.540.0
|
||||||
Release: 0
|
Release: 0
|
||||||
|
# 0.54 -> normalize -> 0.540.0
|
||||||
|
%define cpan_version 0.54
|
||||||
License: Artistic-1.0 OR GPL-1.0-or-later
|
License: Artistic-1.0 OR GPL-1.0-or-later
|
||||||
Summary: Check syntax, presence of use strict; and test coverage
|
Summary: Check syntax, presence of use strict; and test coverage
|
||||||
URL: https://metacpan.org/release/%{cpan_name}
|
URL: https://metacpan.org/release/%{cpan_name}
|
||||||
Source0: https://cpan.metacpan.org/authors/id/M/MA/MANWAR/%{cpan_name}-%{version}.tar.gz
|
Source0: https://cpan.metacpan.org/authors/id/M/MA/MANWAR/%{cpan_name}-%{cpan_version}.tar.gz
|
||||||
Source1: cpanspec.yml
|
Source1: cpanspec.yml
|
||||||
# PATCH-FIX-UPSTREAM test-perl-5.38.patch gh#manwar/Test-Strict#33 -- Don't simultaneously test -c and -v switches
|
|
||||||
Patch0: test-perl-5.38.patch
|
|
||||||
BuildArch: noarch
|
BuildArch: noarch
|
||||||
BuildRequires: perl
|
BuildRequires: perl
|
||||||
BuildRequires: perl-macros
|
BuildRequires: perl-macros
|
||||||
BuildRequires: perl(ExtUtils::MakeMaker) >= 6.64
|
BuildRequires: perl(ExtUtils::MakeMaker) >= 6.64
|
||||||
BuildRequires: perl(IO::Scalar)
|
BuildRequires: perl(IO::Scalar)
|
||||||
BuildRequires: perl(Test::More) >= 1.00
|
BuildRequires: perl(Test::More) >= 1.00
|
||||||
|
Provides: perl(Test::Strict) = %{version}
|
||||||
|
%undefine __perllib_provides
|
||||||
%{perl_requires}
|
%{perl_requires}
|
||||||
|
|
||||||
%description
|
%description
|
||||||
@@ -54,13 +56,17 @@ paths are untainted with the following pattern: 'qr|^([-+@\w./:\\]+)$|'
|
|||||||
controlled by '$Test::Strict::UNTAINT_PATTERN'.
|
controlled by '$Test::Strict::UNTAINT_PATTERN'.
|
||||||
|
|
||||||
%prep
|
%prep
|
||||||
%autosetup -n %{cpan_name}-%{version} -p1
|
%autosetup -n %{cpan_name}-%{cpan_version} -p1
|
||||||
|
|
||||||
|
find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -path "*/scripts/*" ! -name "configure" -print0 | xargs -0 chmod 644
|
||||||
|
|
||||||
%build
|
%build
|
||||||
perl Makefile.PL INSTALLDIRS=vendor
|
perl Makefile.PL INSTALLDIRS=vendor
|
||||||
%make_build
|
%make_build
|
||||||
|
|
||||||
%check
|
%check
|
||||||
|
# generated by find-debuginfo in current Tumblweeed, not sure why or how to disable that
|
||||||
|
rm -f debugfiles.list debuglinks.list debugsourcefiles.list debugsources.list elfbins.list
|
||||||
make test
|
make test
|
||||||
|
|
||||||
%install
|
%install
|
||||||
|
@@ -1,108 +0,0 @@
|
|||||||
From 8cc3a355b90db21b76374d3b563df3628b31d58c Mon Sep 17 00:00:00 2001
|
|
||||||
From: James E Keenan <jkeenan@cpan.org>
|
|
||||||
Date: Sat, 14 Jan 2023 22:42:22 +0000
|
|
||||||
Subject: [PATCH] Don't simultaneously test -c and -v switches
|
|
||||||
|
|
||||||
Up through perl-5.37.3, there was a bug in perl (see
|
|
||||||
https://github.com/Perl/perl5/issues/20252#issuecomment-1236880872)
|
|
||||||
which permitted simultaneous use of the '-c' and '-v' switches to the
|
|
||||||
perl interpreter. Once this bug was corrected, t/01all.t began to fail.
|
|
||||||
As Test::Strict has many CPAN distributions depending on it, this test
|
|
||||||
failure has had wide impact.
|
|
||||||
|
|
||||||
This pull request modifies tests appropriately and has been tested on
|
|
||||||
bleadperl (v5.37.7-134-g25948dfb24) and on perl-5.32.1, in both cases on
|
|
||||||
threaded builds on FreeBSD-12. Devel::Cover was not installed on
|
|
||||||
bleadperl, hence t/04cover.t was skipped on that build. Otherwise, all
|
|
||||||
tests are passing. In the course of testing, certain additions were
|
|
||||||
made to .gitignore and MANIFEST.SKIP to get metadata-oriented tests to
|
|
||||||
pass.
|
|
||||||
|
|
||||||
NOTE: In my git checkout I find the following file:
|
|
||||||
|
|
||||||
.git/hooksfsmonitor-watchman.sample
|
|
||||||
|
|
||||||
This is deemed by 'file' to be a Perl executable. As such, it is pushed
|
|
||||||
onto the list of files tested by 'all_perl_files_ok()' at the start of
|
|
||||||
t/01all.t. This in turn means that in my 'git checkout' the count of
|
|
||||||
tests is off by 2 and the test is reported to fail.
|
|
||||||
|
|
||||||
"Looks like you planned 59 tests but ran 61."
|
|
||||||
|
|
||||||
Because the files in .git/hooks/ should not be included in the tarball,
|
|
||||||
the count of tests is correct when run from the tarball. I leave to the
|
|
||||||
maintainer to determine how to square this circle. You should probably
|
|
||||||
check for the presence of a .git/ directory and exclude that directory
|
|
||||||
from the list of directories passed to all_perl_files_ok().
|
|
||||||
|
|
||||||
For https://github.com/manwar/Test-Strict/issues/32
|
|
||||||
---
|
|
||||||
.gitignore | 2 ++
|
|
||||||
MANIFEST.SKIP | 5 +++--
|
|
||||||
t/01all.t | 4 +---
|
|
||||||
t/02fail.t | 3 +--
|
|
||||||
4 files changed, 7 insertions(+), 7 deletions(-)
|
|
||||||
|
|
||||||
diff --git a/MANIFEST.SKIP b/MANIFEST.SKIP
|
|
||||||
index 6dd7c05..03e0675 100644
|
|
||||||
--- a/MANIFEST.SKIP
|
|
||||||
+++ b/MANIFEST.SKIP
|
|
||||||
@@ -1,4 +1,5 @@
|
|
||||||
-^\.git
|
|
||||||
+\.gitignore
|
|
||||||
+\.git/
|
|
||||||
maint
|
|
||||||
^tags$
|
|
||||||
.last_cover_stats
|
|
||||||
@@ -8,7 +9,7 @@ Makefile$
|
|
||||||
^.*.bak
|
|
||||||
^.*.old
|
|
||||||
^t.*sessions
|
|
||||||
-^cover_db
|
|
||||||
+cover_db/
|
|
||||||
^.*\.log
|
|
||||||
^.*\.swp$
|
|
||||||
^.*~$
|
|
||||||
diff --git a/t/01all.t b/t/01all.t
|
|
||||||
index 6ff9f23..569354d 100644
|
|
||||||
--- a/t/01all.t
|
|
||||||
+++ b/t/01all.t
|
|
||||||
@@ -125,8 +125,6 @@ subtest perl_v5_12 => sub {
|
|
||||||
strict_ok($filename);
|
|
||||||
};
|
|
||||||
|
|
||||||
-exit;
|
|
||||||
-
|
|
||||||
{
|
|
||||||
my %data;
|
|
||||||
sub make_file {
|
|
||||||
@@ -172,7 +170,7 @@ sub make_warning_files {
|
|
||||||
|
|
||||||
my ($fh2, $filename2) = tempfile( DIR => $tmpdir, SUFFIX => '.pl' );
|
|
||||||
print $fh2 <<'DUMMY';
|
|
||||||
-#!/usr/bin/perl -vw
|
|
||||||
+#!/usr/bin/perl -w
|
|
||||||
use strict;
|
|
||||||
print "Hello world";
|
|
||||||
|
|
||||||
diff --git a/t/02fail.t b/t/02fail.t
|
|
||||||
index d4729cc..b0c8493 100644
|
|
||||||
--- a/t/02fail.t
|
|
||||||
+++ b/t/02fail.t
|
|
||||||
@@ -40,7 +40,6 @@ TODO: {
|
|
||||||
ok !Test::Strict::_strict_ok($fh1), 'use strict in print';
|
|
||||||
}
|
|
||||||
|
|
||||||
-exit;
|
|
||||||
|
|
||||||
|
|
||||||
sub test1 {
|
|
||||||
@@ -199,7 +198,7 @@ DUMMY
|
|
||||||
|
|
||||||
my ($fh2, $filename2) = tempfile( DIR => $tmpdir, SUFFIX => '.pl' );
|
|
||||||
print $fh2 <<'DUMMY';
|
|
||||||
-#!/usr/bin/perl -vw
|
|
||||||
+#!/usr/bin/perl -w
|
|
||||||
use strict;
|
|
||||||
print "Hello world";
|
|
||||||
|
|
Reference in New Issue
Block a user