diff options
| author | Mathieu Lirzin <mthl@openmailbox.org> | 2015-09-22 15:11:48 +0200 |
|---|---|---|
| committer | Mathieu Lirzin <mthl@openmailbox.org> | 2015-09-24 22:55:59 +0200 |
| commit | 23464bfd9961769de5ce0ee3cb92e59a86299ca6 (patch) | |
| tree | 5f48ad928aca41b2d458e88b86071a8980467ef9 /guix/scripts/lint.scm | |
| parent | 2748ee3bcf9373bef58fee7458606fef05626781 (diff) | |
| download | gnu-guix-23464bfd9961769de5ce0ee3cb92e59a86299ca6.tar gnu-guix-23464bfd9961769de5ce0ee3cb92e59a86299ca6.tar.gz | |
lint: Accept '`' character.
* guix/scripts/lint.scm (properly-starts-sentence?): Match Texinfo
highlighting commands as a sentence start.
Diffstat (limited to 'guix/scripts/lint.scm')
| -rw-r--r-- | guix/scripts/lint.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/lint.scm b/guix/scripts/lint.scm index 95a8e2e66d..b0427f75f4 100644 --- a/guix/scripts/lint.scm +++ b/guix/scripts/lint.scm @@ -129,7 +129,7 @@ monad." (exit 0)) (define (properly-starts-sentence? s) - (string-match "^[(\"'[:upper:][:digit:]]" s)) + (string-match "^[(\"'`[:upper:][:digit:]]" s)) (define (starts-with-abbreviation? s) "Return #t if S starts with what looks like an abbreviation or acronym." |