rosenthal: guile-toml: Base on the Guix package.

* modules/rosenthal/packages/guile-xyz.scm (guile-toml): Rename to...
(guile-toml/dolly): ...this new variable, based on the Guix package.
* modules/rosenthal/utils/file.scm (toml-file): Use it.
This commit is contained in:
Hilton Chain 2026-08-22 01:56:07 +08:00
parent 4982100143
commit 7a0190a86b
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292
2 changed files with 18 additions and 32 deletions

View File

@ -15,34 +15,20 @@
#:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz))
(define-public guile-toml
(let ((commit "ecb24deb407ef76ef7cf7e9f0115060c98366a6b")
(revision "0"))
(package
(name "guile-toml")
(version (git-version "0.0.0" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hylophile/guile-toml")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"1iqxivxcb0dcjbd5ba3c0g3mj71b32qjxfdmljyv9r297yykfd02"))
(patches
(rosenthal-patches "guile-toml-support-boolean.patch"))))
(build-system guile-build-system)
(arguments
(list #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'avoid-test-installation
(lambda _
(delete-file-recursively "test"))))))
(native-inputs (list guile-3.0))
(propagated-inputs (list guile-json-4))
(home-page "https://github.com/hylophile/guile-toml")
(synopsis "TOML module for GNU Guile")
(description "")
(license license:gpl3+)
(properties '((disable-updater? . #t))))))
(define-public guile-toml/dolly
(package
(inherit guile-toml)
(name "guile-toml")
(version "1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hylophile/guile-toml")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0nyxj9gz0v5n2whi5wikidz5d5a7hf181vwnlr0v1l67xvxhxv1d"))
(patches
(rosenthal-patches "guile-toml-support-boolean.patch"))))
(properties '((disable-updater? . #t)))))

View File

@ -130,7 +130,7 @@
(define (toml-file name exp)
"Return a file-like object, outputing TOML file serialized from EXP."
(computed-file name
(with-extensions (list guile-json-4 guile-toml)
(with-extensions (list guile-json-4 guile-toml/dolly)
(if (gexp? exp)
#~(begin
(use-modules (srfi srfi-26) (toml))