diff options
| author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2022-03-22 11:29:25 -0400 |
|---|---|---|
| committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2022-03-22 15:39:39 -0400 |
| commit | 15d1d23dbbd1f2f45820c205c38bf666382bc211 (patch) | |
| tree | 52af9e6c5f80d7399ead2bae3951c26689e7126d /gnu/packages/man.scm | |
| parent | 49b350fafc2c3ea1db66461b73d4e304cd13ec92 (diff) | |
gnu: man-db: Simplify 'patch-test-shebangs' phase.
* gnu/packages/man.scm (man-db)[phases]{patch-test-shebangs}: Do not filter
nonexistent directories from find-files.
[modules]: Delete field.
Diffstat (limited to 'gnu/packages/man.scm')
| -rw-r--r-- | gnu/packages/man.scm | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/gnu/packages/man.scm b/gnu/packages/man.scm index 14aaa36ea1f..1c1d82758bb 100644 --- a/gnu/packages/man.scm +++ b/gnu/packages/man.scm | |||
| @@ -146,8 +146,7 @@ a flexible and convenient way.") | |||
| 146 | (substitute* file | 146 | (substitute* file |
| 147 | (("#! /bin/sh") | 147 | (("#! /bin/sh") |
| 148 | (string-append "#!" (which "sh"))))) | 148 | (string-append "#!" (which "sh"))))) |
| 149 | (remove file-is-directory? | 149 | (find-files "src/tests"))))) |
| 150 | (find-files "src/tests" ".*")))))) | ||
| 151 | (add-after 'unpack 'patch-absolute-paths | 150 | (add-after 'unpack 'patch-absolute-paths |
| 152 | (lambda* (#:key inputs #:allow-other-keys) | 151 | (lambda* (#:key inputs #:allow-other-keys) |
| 153 | (substitute* "src/man.c" | 152 | (substitute* "src/man.c" |
| @@ -194,10 +193,7 @@ a flexible and convenient way.") | |||
| 194 | '("nroff" "eqn" "neqn" "tbl" "refer" "pic"))) | 193 | '("nroff" "eqn" "neqn" "tbl" "refer" "pic"))) |
| 195 | ;; At run time we should refer to GROFF-MINIMAL, not GROFF (the latter | 194 | ;; At run time we should refer to GROFF-MINIMAL, not GROFF (the latter |
| 196 | ;; pulls in Perl.) | 195 | ;; pulls in Perl.) |
| 197 | #:disallowed-references (list groff) | 196 | #:disallowed-references (list groff))) |
| 198 | #:modules '((guix build gnu-build-system) | ||
| 199 | (guix build utils) | ||
| 200 | (srfi srfi-1)))) | ||
| 201 | (native-inputs | 197 | (native-inputs |
| 202 | (list pkg-config flex | 198 | (list pkg-config flex |
| 203 | ;; Groff is needed at build time for troff, grops, soelim, etc. | 199 | ;; Groff is needed at build time for troff, grops, soelim, etc. |
