ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 05:48:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

lint: Improve 'check-texinfo-markup'.

Browse source 
* guix/scripts/lint.scm (check-description-style): Set 'field' parameter
  when emitting a warning in 'check-texinfo-markup'.  Catch any error
  that may occur in during the 'texi->plain-text' conversion.  This is a
  followup to commit 2748ee3.
This commit is contained in:
Mathieu Lirzin 2015-09-25 00:37:36 +02:00
parent 15d5ca1356
commit 5d8d8f3b0a
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
guix/scripts/lint.scm
View file

@ -146,11 +146,11 @@ (define (check-not-empty description)
(define (check-texinfo-markup description)
"Check that DESCRIPTION can be parsed as a Texinfo fragment. If the
markup is valid return a plain-text version of DESCRIPTION, otherwise #f."
(catch 'parser-error
(lambda () (texi->plain-text description))
(lambda (keys . args)
(emit-warning package (_ "Texinfo markup in description is invalid"))
#f)))
(unless (false-if-exception (texi->plain-text description))
(emit-warning package
(_ "Texinfo markup in description is invalid")
'description)
#f))
(define (check-proper-start description)
(unless (or (properly-starts-sentence? description)