Sun Apr 20 23:00:50+0300 2025
efa9af2
Use make file in cogd-manual package
modules/cogd/packages/guile-xyz.scm
| 7 | 7 | (use-modules (guix packages) | |
| 8 | 8 | (guix git-download) | |
| 9 | 9 | (guix gexp) | |
| 10 | + | (guix utils) | |
| 10 | 11 | (guix build-system guile) | |
| 11 | 12 | (guix build-system copy) | |
| 12 | 13 | ((guix licenses) #:prefix license:) | |
| 13 | 14 | (gnu packages skribilo) | |
| 14 | 15 | (gnu packages bash) | |
| 16 | + | (gnu packages build-tools) | |
| 15 | 17 | (gnu packages guile)) | |
| 16 | 18 | ||
| 17 | 19 | (define-public guile-gpio | |
… | |||
| 92 | 94 | (name "cogd-manual") | |
| 93 | 95 | (version "git") | |
| 94 | 96 | (source | |
| 95 | - | (local-file "../../../manuals" "cogd-manuals" | |
| 96 | - | #:recursive? #t)) | |
| 97 | + | (let ((dir ((compose dirname dirname dirname) | |
| 98 | + | (current-source-directory)))) | |
| 99 | + | (local-file dir | |
| 100 | + | "cogd-checkout" | |
| 101 | + | #:recursive? #t | |
| 102 | + | #:select? (or (git-predicate dir) | |
| 103 | + | (const #t))))) | |
| 97 | 104 | (build-system copy-build-system) | |
| 98 | 105 | (arguments | |
| 99 | 106 | (list | |
| 100 | 107 | #:install-plan | |
| 101 | - | #~'(("cogd.info" "share/info/")) | |
| 108 | + | #~'(("manuals/cogd.info" "share/info/")) | |
| 102 | 109 | #:phases | |
| 103 | 110 | #~(modify-phases %standard-phases | |
| 104 | 111 | (add-before 'install 'build | |
| 105 | 112 | (lambda _ | |
| 106 | - | (invoke "skribilo" | |
| 107 | - | "-t" | |
| 108 | - | "info" | |
| 109 | - | "-o" | |
| 110 | - | "cogd.info" | |
| 111 | - | "cogd.skb")))))) | |
| 112 | - | (native-inputs (list skribilo)) | |
| 113 | + | (setenv "GUILE_AUTO_COMPILE" "0") | |
| 114 | + | (invoke "guile" "make.scm" "info")))))) | |
| 115 | + | (native-inputs (list guile-3.0 potato-make skribilo)) | |
| 113 | 116 | (home-page "https://repo.pisemsky.site/cogd") | |
| 114 | 117 | (synopsis "Manual for the cogd") | |
| 115 | 118 | (description | |