[bug#52422] [PATCH v2 1/2] gnu: Add bibutils.

[Liliana Marie Prikler <liliana.prikler@gmail.com>]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 2722 bytes --]

* gnu/packages/textutils.scm (bibutils): New variable.
---
Am Mittwoch, dem 22.12.2021 um 22:42 +0100 schrieb Ludovic Courtès:
> Bonus points if you change that to:
> 
>   (list #:configure-flags
>         #~(list … #$output …)
>         …)
Watch my street cred go up as I mix quasiquote and gexp 😎
On a related note, is it already known that you can't use
(arguments #~(list ...))?

> GPLv2-only?
Yes.  They don't copypasta the full license blurb, but all file headers
say that the source code is distributed under "GPL version 2".

 gnu/packages/textutils.scm | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)

diff --git a/gnu/packages/textutils.scm b/gnu/packages/textutils.scm
index 49fcdad47b..a7bff73383 100644
--- a/gnu/packages/textutils.scm
+++ b/gnu/packages/textutils.scm
@@ -44,6 +44,7 @@ (define-module (gnu packages textutils)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
   #:use-module (guix download)
+  #:use-module (guix gexp)
   #:use-module (guix git-download)
   #:use-module (guix build-system ant)
   #:use-module (guix build-system gnu)
@@ -1137,6 +1138,40 @@ (define-public odt2txt
 OpenDocument presentations (*.odp).")
     (license license:gpl2)))
 
+(define-public bibutils
+  (package
+    (name "bibutils")
+    (version "7.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://sourceforge/bibutils/"
+                                  "bibutils_" version "_src.tgz"))
+
+              (sha256
+               (base32
+                "1hxmwjjzw48w6hdh2x7ybkrhi1xngd55i67hrrd3wswa3vpql0kf"))))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:configure-flags
+       ,#~(list "--install-dir" (string-append #$output "/bin")
+                "--install-lib" (string-append #$output "/lib")
+                "--dynamic")
+       #:make-flags
+       ,#~(list (string-append "CC=" #+(cc-for-target))
+                (string-append "LDFLAGSIN=-Wl,-rpath=" #$output "/lib"))
+       #:test-target "test"
+       #:phases
+       (modify-phases %standard-phases
+         (replace 'configure
+           (lambda* (#:key configure-flags #:allow-other-keys)
+             ;; configure script is ill-formed, invoke it manually
+             (apply invoke "sh" "./configure" configure-flags))))))
+    (home-page "https://bibutils.sourceforge.io/")
+    (synopsis "Convert between various bibliography formats")
+    (description "This package provides converters for various bibliography
+formats (e.g. Bibtex, RIS, ...) using a common XML intermediate.")
+    (license license:gpl2)))
+
 (define-public opencc
   (package
     (name "opencc")
-- 
2.34.0