diff options
| -rw-r--r-- | gnu/packages/guile-xyz.scm | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index ea192c2c03..044a491259 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -104,6 +104,7 @@ #:use-module (gnu packages man) #:use-module (gnu packages maths) #:use-module (gnu packages mes) + #:use-module (gnu packages mp3) #:use-module (gnu packages multiprecision) #:use-module (gnu packages ncurses) #:use-module (gnu packages networking) @@ -1062,6 +1063,41 @@ manager. It can be used to query Sway, assign keybindings and listen to events in Guile.") (license license:expat))) +(define-public guile-taglib + (let ((commit "c056ac9eb375459c53284aa20f35b0778cfa3cea") + (version "0") + (revision "0")) + (package + (name "guile-taglib") + (version (git-version version revision commit)) + (home-page "https://github.com/sbarbit/guile-taglib") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/sbarbit/guile-taglib") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "07z65hqxjm6rd9cdk2b9dcxj8hgz7c9dg4iprr19jrvj4ymzrbff")))) + (build-system guile-build-system) + (native-inputs (list guile-3.0)) + (propagated-inputs (list taglib)) + (arguments + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'fix-taglib-path + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "taglib.scm" + (("libtag_c.so") + (search-input-file inputs "/lib/libtag_c.so")))))))) + (synopsis "Guile bindings for the taglib library") + (description + "This package provides Guile bindings for the taglib C library. +It can be used to access and modify metadata for audio files.") + (license license:gpl2+)))) + (define-public guile-syntax-highlight (package (name "guile-syntax-highlight") |