diff options
author | Efraim Flashner <efraim@flashner.co.il> | 2020-04-10 00:29:56 +0300 |
---|---|---|
committer | Efraim Flashner <efraim@flashner.co.il> | 2020-04-10 00:45:59 +0300 |
commit | d95252baf97adb261dd823d4e7a74a7522815c1c (patch) | |
tree | 4e0ee973447e06dd4af245d811960493ea1ac89a /guix | |
parent | 960abd585940c33744040c79e2a37e588d36e589 (diff) |
lint: Check for inappropriate inputs in propagated-inputs too.
* guix/lint.scm (check-inputs-should-be-native): Also check the
propagated inputs of the package.
Diffstat (limited to 'guix')
-rw-r--r-- | guix/lint.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/lint.scm b/guix/lint.scm index 72582cfffb..bda5c0cd77 100644 --- a/guix/lint.scm +++ b/guix/lint.scm @@ -7,7 +7,7 @@ ;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com> ;;; Copyright © 2017 Alex Kost <alezost@gmail.com> ;;; Copyright © 2017 Tobias Geerinckx-Rice <me@tobias.gr> -;;; Copyright © 2017, 2018 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2017, 2018, 2020 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2018, 2019 Arun Isaac <arunisaac@systemreboot.net> ;;; ;;; This file is part of GNU Guix. @@ -286,7 +286,8 @@ of a package, and INPUT-NAMES, a list of package specifications such as (define (check-inputs-should-be-native package) ;; Emit a warning if some inputs of PACKAGE are likely to belong to its ;; native inputs. - (let ((inputs (package-inputs package)) + (let ((inputs (append (package-inputs package) + (package-propagated-inputs package))) (input-names '("pkg-config" "autoconf" |