tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-08 14:10:38 +02:00
Code 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
1 changed files with 4 additions and 1 deletions
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