diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-09-06 10:54:51 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-09-06 12:36:15 +0200 |
commit | 52b9efe337d00f2ce65c4d4ca74ccc3679e6aad8 (patch) | |
tree | 8fd36c84ea918b3f1e9d3c4995eb23205e0eeb42 /tests/lint.scm | |
parent | 718a2bde42c56a93faf182ddeb757b5cc937031e (diff) | |
download | guix-52b9efe337d00f2ce65c4d4ca74ccc3679e6aad8.tar guix-52b9efe337d00f2ce65c4d4ca74ccc3679e6aad8.tar.gz |
lint: Add 'license' checker.
* guix/scripts/lint.scm (check-license): New procedure.
(%checkers): Add 'license' checker.
* tests/lint.scm ("license: invalid license"): New test.
Diffstat (limited to 'tests/lint.scm')
-rw-r--r-- | tests/lint.scm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/lint.scm b/tests/lint.scm index 5d56420966..ac47dbb768 100644 --- a/tests/lint.scm +++ b/tests/lint.scm @@ -329,6 +329,12 @@ requests." (check-derivation pkg))) "failed to create derivation"))) +(test-assert "license: invalid license" + (string-contains + (with-warnings + (check-license (dummy-package "x" (license #f)))) + "invalid license")) + (test-assert "home-page: wrong home-page" (->bool (string-contains |