diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2021-02-20 08:42:13 +0100 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2021-02-20 08:42:13 +0100 |
| commit | 76503e0f233e5cbdc65bf48d0fc05dac483a9224 (patch) | |
| tree | 929bb773b141221d5196f9ba25537b3056a0c680 | |
| parent | 27f23eab2f54b0c4822261ef26a4b345e183c091 (diff) | |
Add guix environment file.
| -rw-r--r-- | .guix.scm | 76 |
1 files changed, 76 insertions, 0 deletions
diff --git a/.guix.scm b/.guix.scm new file mode 100644 index 0000000..a2e0bde --- /dev/null +++ b/.guix.scm @@ -0,0 +1,76 @@ +;;; Copyright © 2018, 2019, 2020, 2021 Ricardo Wurmus <rekado@elephly.net> +;;; +;;; This program is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; This program is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with this program. If not, see <http://www.gnu.org/licenses/>. + +(use-modules (srfi srfi-1) + (srfi srfi-11) + (guix packages) + (guix utils) + (gnu packages base) + (gnu packages gnupg) + (gnu packages guile-xyz) + (gnu packages tex) + (gnu packages ssh) + (gnu packages texinfo) + (gnu packages version-control)) + +(define guile-lib/htmlprag-fixed + ;; Guile-Lib with a hotfix for (htmlprag). + (package + (inherit guile-lib) + (arguments + (substitute-keyword-arguments (package-arguments guile-lib) + ((#:phases phases '%standard-phases) + `(modify-phases ,phases + (add-before 'build 'fix-htmlprag + (lambda _ + ;; When parsing + ;; "<body><blockquote><p>foo</p>\n</blockquote></body>", + ;; 'html->shtml' would mistakenly close 'blockquote' right + ;; before <p>. This patch removes 'p' from the + ;; 'parent-constraints' alist to fix that. + (substitute* "src/htmlprag.scm" + (("^[[:blank:]]*\\(p[[:blank:]]+\\. \\(body td th\\)\\).*") + "")) + #t)) + (add-before 'check 'skip-known-failure + (lambda _ + ;; XXX: The above change causes one test failure among + ;; the htmlprag tests. + (setenv "XFAIL_TESTS" "htmlprag.scm") + #t)))))))) + +(define-public guile-picture-language/devel + (package + (inherit guile-picture-language) + (source #f) + (arguments + '(#:make-flags + '("GUILE_AUTO_COMPILE=0"))) + (native-inputs + `(("texlive" ,texlive-tiny) ; for make distcheck + ("sed" ,sed) + + ("git" ,git-minimal) + + ;; For manual post processing + ("guile-lib" ,guile-lib/htmlprag-fixed) + + ;; For "git push" + ("ssh" ,openssh) + ("texinfo" ,texinfo) + + ,@(package-native-inputs guile-picture-language))))) + +guile-picture-language/devel |