guix/guix
3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
Code Issues Releases Wiki Activity

lint: Adjust file-name length test for out-of-tree file names.

Browse source 
* guix/scripts/lint.scm (check-patch-file-names): Adjust
file-name-length calculation.
This commit is contained in:
Ludovic Courtès 2017-11-28 15:52:01 +01:00
parent eef01cfe8e
commit 0a154c15a8
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
guix/scripts/lint.scm
View file

@ -618,7 +618,10 @@ patch could not be found."
(max 99))
(for-each (match-lambda
((? string? patch)
(when (> (+ margin (- (string-length patch) prefix))
(when (> (+ margin (if (string-prefix? %distro-directory
patch)
(- (string-length patch) prefix)
(string-length patch)))
max)
(emit-warning
package