diff options
author | David Craven <david@craven.ch> | 2016-07-22 19:50:54 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-07-24 19:54:15 +0200 |
commit | 99fe215cc1c511a82e326727c6a0d193d246a387 (patch) | |
tree | 63adf0c588578a736396de4b1a5d0b2a5dc0d4c9 /tests/lint.scm | |
parent | 0f53b886e27ac6ea340d19f3627c273c7f82016e (diff) |
lint: 'inputs-should-be-native' checks for intltool, itstool and glib:bin.
* guix/scripts/lint.scm (check-inputs-should-be-native): Warn when intltool,
itstool or glib:bin isn't a native-input.
* tests/lint.scm (inputs: glib:bin is probably a native input): Add test.
Co-authored-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'tests/lint.scm')
-rw-r--r-- | tests/lint.scm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/tests/lint.scm b/tests/lint.scm index ce751c42c9..770f43e57f 100644 --- a/tests/lint.scm +++ b/tests/lint.scm @@ -31,6 +31,7 @@ #:use-module (guix scripts lint) #:use-module (guix ui) #:use-module (gnu packages) + #:use-module (gnu packages glib) #:use-module (gnu packages pkg-config) #:use-module (web server) #:use-module (web server http) @@ -319,7 +320,16 @@ string) on HTTP requests." (let ((pkg (dummy-package "x" (inputs `(("pkg-config" ,pkg-config)))))) (check-inputs-should-be-native pkg))) - "pkg-config should probably be a native input"))) + "'pkg-config' should probably be a native input"))) + +(test-assert "inputs: glib:bin is probably a native input" + (->bool + (string-contains + (with-warnings + (let ((pkg (dummy-package "x" + (inputs `(("glib" ,glib "bin")))))) + (check-inputs-should-be-native pkg))) + "'glib:bin' should probably be a native input"))) (test-assert "patches: file names" (->bool |