diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-10-19 13:55:25 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-10-19 15:54:10 +0200 |
commit | 4bb54cc42ff5653fe59f5a8ebf39515ba1840a6d (patch) | |
tree | ce010763c18253998a4525f78afd8dd2af1d1095 /tests/lint.scm | |
parent | 4534d85e706b58530bf6bd01dc1497fa55a085a6 (diff) | |
download | guix-4bb54cc42ff5653fe59f5a8ebf39515ba1840a6d.tar.gz |
lint: Suggest @code instead of quotes.
* guix/scripts/lint.scm (%quoted-identifier-rx): New variable. (check-description-style)[check-quotes]: New procedure. Use it. * tests/lint.scm ("description: suggest ornament instead of quotes"): New test.
Diffstat (limited to 'tests/lint.scm')
-rw-r--r-- | tests/lint.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/lint.scm b/tests/lint.scm index d692b42f93..fa2d19b2a6 100644 --- a/tests/lint.scm +++ b/tests/lint.scm @@ -218,6 +218,14 @@ string) on HTTP requests." (check-description-style pkg))) "should not contain trademark sign")))) +(test-assert "description: suggest ornament instead of quotes" + (->bool + (string-contains (with-warnings + (let ((pkg (dummy-package "x" + (description "This is a 'quoted' thing.")))) + (check-description-style pkg))) + "use @code"))) + (test-assert "synopsis: not a string" (->bool (string-contains (with-warnings |