mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
gnu: perl-critic: Make the perlcritic command available.
* gnu/packages/perl.scm (perl-critic)[arguments]<#:phases>: Add phases to wrap the perlcritic command and test it works. [inputs]: Add bash-minimal for wrap-program. Change-Id: I8c506e655fdf2b1c33e850579c6a5adcbbd37192 Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
3daab04414
commit
034eb1b0b6
1 changed files with 15 additions and 0 deletions
|
@ -2294,7 +2294,22 @@ (define-public perl-critic
|
|||
(base32
|
||||
"1nzxpn71mrpp85yxrxlraj52q2skvf9ja887ls11d57h6smg1vmz"))))
|
||||
(build-system perl-build-system)
|
||||
(arguments
|
||||
(list
|
||||
#:phases #~(modify-phases %standard-phases
|
||||
(add-after 'install 'wrap-perlcritic
|
||||
(lambda _
|
||||
(wrap-program (string-append #$output "/bin/perlcritic")
|
||||
`("PERL5LIB" ":" prefix
|
||||
(,(getenv "PERL5LIB") ,(string-append #$output
|
||||
"/lib/perl5/site_perl"))))))
|
||||
(add-after 'wrap-perlcritic 'check-perlcritic
|
||||
(lambda* (#:key tests? #:allow-other-keys)
|
||||
(when tests?
|
||||
(invoke (string-append #$output "/bin/perlcritic")
|
||||
"--version")))))))
|
||||
(native-inputs (list perl-module-build perl-test-deep))
|
||||
(inputs (list bash-minimal))
|
||||
(propagated-inputs (list perltidy
|
||||
perl-exception-class
|
||||
perl-io-string
|
||||
|
|
Loading…
Reference in a new issue