[pkg-perl-tools] 01/01: Move application-not-library lintian check to lintian proper

Axel Beckert abe at deuxchevaux.org
Tue Aug 11 12:15:39 UTC 2015


This is an automated email from the git hooks/post-receive script.

abe pushed a commit to branch ppt-lc-mover
in repository pkg-perl-tools.

commit 31a84245bb07fefb9ff058ce0a4505a9d1bfeb81
Author: Axel Beckert <abe at deuxchevaux.org>
Date:   Tue Aug 11 12:08:08 2015 +0200

    Move application-not-library lintian check to lintian proper
---
 debian/changelog                                   |  1 +
 .../checks/pkg-perl/application-not-library.desc   | 51 --------------
 lintian/checks/pkg-perl/application-not-library.pm | 79 ----------------------
 3 files changed, 1 insertion(+), 130 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 8440a45..14ab82c 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -3,6 +3,7 @@ pkg-perl-tools (0.23) UNRELEASED; urgency=medium
   [ Axel Beckert ]
   * Fix patchedit to not expect a file in $PATH as $EDITOR but to support
     $EDITOR to contain commandline options.
+  * Move application-not-library lintian check to lintian proper.
 
   [ gregor herrmann ]
   * examples/check-build: use mergechanges for sourceless uploads instead
diff --git a/lintian/checks/pkg-perl/application-not-library.desc b/lintian/checks/pkg-perl/application-not-library.desc
deleted file mode 100644
index 1e90f39..0000000
--- a/lintian/checks/pkg-perl/application-not-library.desc
+++ /dev/null
@@ -1,51 +0,0 @@
-Check-Script: pkg-perl/application-not-library
-Author: Axel Beckert <abe at debian.org>
-Type: binary
-Info: application packaged like a library
-
-Tag: libapp-perl-package-name
-Severity: important
-Certainty: certain
-Info: This package contains a program in $PATH and is named
- libapp-*-perl which usually implies that the upstream project on CPAN
- is under the App:: hierachy for applications. Instead of
- libfoo-bar-perl it should be named foo-bar.
- .
- People tend to skip library-like named packages when looking for
- applications in the package list and hence wouldn't notice this
- package.  See
- http://pkg-perl.alioth.debian.org/policy.html#package_naming_policy
- for some more reasoning and details.
-
-Tag: library-package-name-for-application
-Severity: normal
-Certainty: possible
-Experimental: yes
-Info: This package contains a program in $PATH but is named like a
- library. E.g. instead of libfoo-bar-perl it should be named just
- foo-bar.
- .
- People tend to skip library-like named packages when looking for
- applications in the package list and hence wouldn't notice this
- package.  See
- http://pkg-perl.alioth.debian.org/policy.html#package_naming_policy
- for some (not perl-specific) reasoning.
- .
- In case the program in $PATH is only a helper tool and the package is
- primarily a library, please add a lintian override for this tag.
-
-Tag: application-in-library-section
-Severity: normal
-Certainty: possible
-Experimental: yes
-Info: This package contains a binary in $PATH but is in a section just
- thought for libraries. It likely should be in another section like
- e.g. utils, text, devel, misc, etc., but not in e.g. perl, ruby or
- python.
- .
- People tend to skip these package sections when looking for
- applications in the package list and hence wouldn't notice this
- package.
- .
- In case the program in $PATH is only a helper tool and the package is
- primarily a library, please add a lintian override for this tag.
diff --git a/lintian/checks/pkg-perl/application-not-library.pm b/lintian/checks/pkg-perl/application-not-library.pm
deleted file mode 100644
index 63adce8..0000000
--- a/lintian/checks/pkg-perl/application-not-library.pm
+++ /dev/null
@@ -1,79 +0,0 @@
-# pkg-perl/application-not-library -- find applications packaged like a library -*- perl -*-
-#
-# Copyright © 2014 Axel Beckert <abe at debian.org>
-#
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program.  If not, you can find it on the World Wide
-# Web at http://www.gnu.org/copyleft/gpl.html, or write to the Free
-# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
-# MA 02110-1301, USA.
-
-package Lintian::pkg_perl::application_not_library;
-
-use strict;
-use warnings;
-
-use Lintian::Tags qw(tag);
-
-sub run {
-    my ( $pkg, $type, $info, $proc, $group ) = @_;
-
-    return if # Big exception list for all tags
-        $pkg =~ /^perl(-base)?$/                    or # perl itself
-        $pkg =~ /^ruby[\d.]*$/                      or # ruby itself
-        $pkg =~ /^python[\d.]*(-dev|-minimal)?$/    or # python itself
-        $pkg =~ /^cpan(plus|minus)$/                or # cpan package managers
-        $pkg =~ /^libmodule-.*-perl$/               or # perl module tools
-        $pkg =~ /^libdevel-.*-perl$/                or # perl debugging tools
-        $pkg =~ /^libperl.*-perl$/                  or # perl-handling tools
-        $pkg =~ /^libtest-.*-perl$/                 or # perl testing tools
-        $pkg =~ /^python[\d.]*-(stdeb|setuptools)$/ or # python packaging stuff
-        $pkg =~ /^gem2deb/                          or # ruby packaging stuff
-        $pkg =~ /^xulrunner/                        or # rendering engine
-        $pkg =~ /^lib.*-(utils|tools|bin|dev)/      or # generic library helpers
-        grep { $pkg eq $_ } qw(rake bundler coderay kdelibs-bin); # whitelist
-
-    my @programs = ();
-    foreach my $binpath (qw(bin sbin usr/bin usr/sbin usr/games)) {
-        my $bindir = $info->index("$binpath/");
-        next unless $bindir;
-
-        push(@programs,
-             grep { !/update$/ }     # ignore library maintenance tools
-             grep { !/properties$/ } # ignore library configuration tools
-             map { $_->name; }
-             grep { $_->basename !~ /^dh_/ } # ignore debhelper plugins
-             $bindir->children);
-    }
-
-    return unless @programs;
-
-    # Check for library style package names
-    if ($pkg =~ /^lib(.+)-perl$|^ruby-|^python[\d.]*-/) {
-        if ($pkg =~ /^libapp(.+)-perl$/) {
-            tag('libapp-perl-package-name', @programs);
-        } else {
-            tag('library-package-name-for-application', @programs);
-        }
-    }
-
-    # Check for wrong section
-    my $section = $info->field('section');
-    if ($section =~ /perl|python|ruby|^libs/) { # oldlibs is ok
-        tag('application-in-library-section', "$section", @programs);
-    }
-
-    return;
-}
-
-1;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/pkg-perl-tools.git



More information about the Pkg-perl-cvs-commits mailing list