From fb39e74093d0102859624c09ab1577584bedd642 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= Date: Tue, 14 Jan 2020 11:26:30 +0100 Subject: [PATCH] Move debugger files into perl-debugger This is can be invoked with "perl -d", but it requires plenty of dependencies comparing to perl-interpreter. But because almost nobody uses it, a subpackage is a better place. --- gendep.macros | 8 +++--- perl.spec | 68 ++++++++++++++++++++++++++++++++++++++++++++++----- 2 files changed, 66 insertions(+), 10 deletions(-) diff --git a/gendep.macros b/gendep.macros index d0cff41..632044e 100644 --- a/gendep.macros +++ b/gendep.macros @@ -329,6 +329,10 @@ Requires: perl(strict) \ Requires: perl(vars) \ Provides: perl(Devel::PPPort) = 3.52 \ %{nil} +%global gendep_perl_debugger \ +Requires: perl(strict) \ +Provides: perl(DB) = 1.08 \ +%{nil} %global gendep_perl_deprecate \ Requires: perl(strict) \ Requires: perl(warnings) \ @@ -2208,12 +2212,8 @@ Provides: perl(experimental) = 0.020 \ %{nil} %global gendep_perl_interpreter \ Requires: perl(I18N::LangTags) \ -Requires: perl(strict) \ Requires: perl(warnings) \ -Provides: perl(DB) = 1.08 \ Provides: perl(EVERY::LAST) \ -Provides: perl(dumpvar.pl) \ -Provides: perl(perl5db.pl) \ %{nil} %global gendep_perl_interpreter_debuginfo \ %{nil} diff --git a/perl.spec b/perl.spec index 1ee08f2..6d1d411 100644 --- a/perl.spec +++ b/perl.spec @@ -376,7 +376,7 @@ Requires: perl-Config-Extensions, perl-Config-Perl-V, perl-constant, Requires: perl-CPAN, perl-CPAN-Meta, perl-CPAN-Meta-Requirements, Requires: perl-CPAN-Meta-YAML, Requires: perl-Data-Dumper, perl-DB_File, perl-DBM_Filter, -Requires: perl-deprecate, +Requires: perl-debugger, perl-deprecate, Requires: perl-Devel-Peek, perl-Devel-PPPort, perl-Devel-SelfStubber, Requires: perl-diagnostics, perl-Digest, perl-Digest-MD5, perl-Digest-SHA, Requires: perl-DirHandle, @@ -486,7 +486,6 @@ Epoch: %{perl_epoch} Requires: perl-libs%{?_isa} = %{perl_epoch}:%{perl_version}-%{release} # Require this till perl-interpreter sub-package provides any modules Requires: %perl_compat -Requires: perl(meta_notation) = %{perl_version} %if %{defined perl_bootstrap} %gendep_perl_interpreter %endif @@ -498,10 +497,6 @@ Requires(post): perl-libs # because of git. Requires(post): perl-macros -# File provides -Provides: perl(dumpvar.pl) -Provides: perl(perl5db.pl) - # suidperl isn't created by upstream since 5.12.0 Obsoletes: perl-suidperl <= 4:5.12.2 # perl was renamed to perl-interpreter and perl-core renamed to perl @@ -531,6 +526,9 @@ Perl header files can be found in perl-devel package. Perl utils like "h2ph" or "perlbug" can be found in perl-utils package. +Perl debugger, usually invoked with "perl -d", is available in perl-debugger +package. + %package libs Summary: The libraries for the perl run-time @@ -1223,6 +1221,46 @@ Conflicts: perl-interpreter < 4:5.30.1-451 This module provides an interface that allows filters to be applied to tied hashes associated with DBM files. +%package debugger +Summary: Perl debugger +License: GPL+ or Artistic +Epoch: 0 +Version: 1.55 +BuildArch: noarch +# File provides +Provides: perl(dumpvar.pl) = %{perl_version} +Provides: perl(perl5db.pl) = %{version} +Requires: %perl_compat +Recommends: perl(Carp) +Recommends: perl(Config) +Requires: perl(Cwd) +Recommends: perl(Devel::Peek) +Requires: perl(feature) +Recommends: perl(IO::Handle) +Recommends: perl(File::Basename) +Recommends: perl(File::Path) +Requires: perl(IO::Socket) +Requires: perl(meta_notation) = %{perl_version} +%if !%{defined perl_bootstrap} +Suggests: perl(PadWalker) >= 0.08 +%endif +Recommends: perl(POSIX) +Requires: perl(Term::ReadLine) +# ??? Term::Rendezvous +Requires: perl(threads) +Requires: perl(threads::shared) +Requires: perl(vars) +Requires: perl(warnings) +%if %{defined perl_bootstrap} +%gendep_perl_debugger +%endif +Conflicts: perl < 4:5.30.1-451 + +%description debugger +This is the perl debugger. It is loaded automatically by Perl when you invoke +a script with "perl -d". There is also "DB" module contained for +a programmatic interface to the debugging API. + %package deprecate Summary: Perl pragma for deprecating the inclusion of a module in core License: GPL+ or Artistic @@ -4925,6 +4963,14 @@ popd %exclude %{_mandir}/man3/DBM_Filter.* %exclude %{_mandir}/man3/DBM_Filter::* +# debugger +%exclude %{privlib}/DB.pm +%exclude %{privlib}/dumpvar.pl +%exclude %{privlib}/perl5db.pl +%exclude %{privlib}/pod/perldebug.pod +%exclude %{_mandir}/man1/perldebug.* +%exclude %{_mandir}/man3/DB.* + # deprecate %exclude %{privlib}/deprecate.pm %exclude %{_mandir}/man3/deprecate.* @@ -6248,6 +6294,15 @@ popd %{_mandir}/man3/DBM_Filter.* %{_mandir}/man3/DBM_Filter::* +%files debugger +%{privlib}/DB.pm +%{privlib}/dumpvar.pl +%{privlib}/perl5db.pl +%dir %{privlib}/pod +%{privlib}/pod/perldebug.pod +%{_mandir}/man1/perldebug.* +%{_mandir}/man3/DB.* + %files deprecate %{privlib}/deprecate.pm %{_mandir}/man3/deprecate.* @@ -7542,6 +7597,7 @@ popd - Subpackage vmsish - Subpackage Pod-Functions - Move feature to perl-libs +- Move debugger files into perl-debugger * Wed Jan 29 2020 Fedora Release Engineering - 4:5.30.1-450 - Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild