~ruther/guix-local

3e626bb39d2a073d715ea89e91aa5981712d33bb — Ludovic Courtès 1 year, 1 month ago ea7a6fa
lint: Adjust ‘check-inputs-should-not-be-an-input-at-all’ tests for Python.

This is a followup to bea2914b3d1b06cc8cc1d9cff88c0dd7d8ebb1be, which
removed ‘python-setuptools’ from the list of “unauthorized” inputs.

* tests/lint.scm ("inputs: python-pip should not be an input at all (input)")
("inputs: python-pip should not be an input at all (native-input)")
("inputs: python-pip should not be an input at all (propagated-input)"):
New tests, with s/python-setuptools/python-pip/.

Change-Id: Ic575825da5c64052d3d573b37b458bd61547bae1
1 files changed, 10 insertions(+), 12 deletions(-)

M tests/lint.scm
M tests/lint.scm => tests/lint.scm +10 -12
@@ 1,7 1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013 Cyril Roelandt <tipecaml@gmail.com>
;;; Copyright © 2014, 2015, 2016 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2014-2024 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014-2025 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;; Copyright © 2017 Alex Kost <alezost@gmail.com>


@@ 448,31 448,29 @@
     (check-inputs-should-be-native pkg))))

(test-equal
    "inputs: python-setuptools should not be an input at all (input)"
  "'python-setuptools' should probably not be an input at all"
    "inputs: python-pip should not be an input at all (input)"
  "'python-pip' should probably not be an input at all"
  (single-lint-warning-message
   (let ((pkg (dummy-package "x"
                             (inputs `(("python-setuptools"
                                        ,python-setuptools))))))
                             (inputs `(("python-pip" ,python-pip))))))
     (check-inputs-should-not-be-an-input-at-all pkg))))

(test-equal
    "inputs: python-setuptools should not be an input at all (native-input)"
  "'python-setuptools' should probably not be an input at all"
    "inputs: python-pip should not be an input at all (native-input)"
  "'python-pip' should probably not be an input at all"
  (single-lint-warning-message
   (let ((pkg (dummy-package "x"
                             (native-inputs
                              `(("python-setuptools"
                                 ,python-setuptools))))))
                              `(("python-pip" ,python-pip))))))
     (check-inputs-should-not-be-an-input-at-all pkg))))

(test-equal
    "inputs: python-setuptools should not be an input at all (propagated-input)"
  "'python-setuptools' should probably not be an input at all"
    "inputs: python-pip should not be an input at all (propagated-input)"
  "'python-pip' should probably not be an input at all"
  (single-lint-warning-message
   (let ((pkg (dummy-package "x"
                             (propagated-inputs
                              `(("python-setuptools" ,python-setuptools))))))
                              `(("python-pip" ,python-pip))))))
     (check-inputs-should-not-be-an-input-at-all pkg))))

(test-assert "input labels: no warnings"