guix_mirror_bot pushed a commit to branch master
in repository guix.
commit ef6c6ebb22dc952763baf0d4d1f90eaa40daa483
Author: Anderson Torres <[email protected]>
AuthorDate: Wed Jul 1 21:39:18 2026 -0300
gnu: m17n-lib: Modernize.
* gnu/packages/language.scm (m17n-lib): Modernize.
[source]: Use git instead of tarball.
[arguments]: Use gexps.
<#:phases>{fix-rpl_malloc}: Don't delete configure script.
[native-inputs]: Unconditionally include elements.
Signed-off-by: Liliana Marie Prikler <[email protected]>
Merges: guix/guix#9896
---
gnu/packages/language.scm | 56 ++++++++++++++++++++++++-----------------------
1 file changed, 29 insertions(+), 27 deletions(-)
diff --git a/gnu/packages/language.scm b/gnu/packages/language.scm
index 4c4cb358e5..cd603c57a7 100644
--- a/gnu/packages/language.scm
+++ b/gnu/packages/language.scm
@@ -1013,21 +1013,38 @@ This package contains the library database.")
(version "1.8.0")
(source
(origin
- (method url-fetch)
- (uri (string-append "mirror://savannah/m17n/m17n-lib-"
- version ".tar.gz"))
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://https.git.savannah.gnu.org/git/m17n/m17n-lib.git";)
+ (commit (string-append "REL-"
+ (string-replace-substring version
+ "." "-")))))
+ (file-name (git-file-name name version))
(sha256
- (base32
- "0jp61y09xqj10mclpip48qlfhniw8gwy8b28cbzxy8hq8pkwmfkq"))
- (patches (search-patches
"m17n-lib-1.8.0-use-pkg-config-for-freetype.patch"))))
+ (base32 "0zvgs9xf9lnhab3n8r3ywc1zbpnz5548gm7g03r7r9b587pvz5zx"))
+ (patches
+ (search-patches "m17n-lib-1.8.0-use-pkg-config-for-freetype.patch"))))
(build-system gnu-build-system)
+ (arguments
+ (list
+ #:parallel-build? #f
+ #:phases
+ (if (%current-target-system)
+ #~(modify-phases %standard-phases
+ ;; INFO: AC_FUNC_MALLOC and AC_FUNC_REALLOC usually unneeded.
+ ;; See
<https://lists.gnu.org/archive/html/autoconf/2003-02/msg00017.html>
+ (add-after 'unpack 'fix-rpl_malloc
+ (lambda _
+ (substitute* "configure.ac"
+ (("AC_FUNC_MALLOC") "")
+ (("AC_FUNC_REALLOC") "")))))
+ #~%standard-phases)))
(native-inputs
- (if (%current-target-system)
- (list pkg-config
- libtool
- gettext-minimal
- autoconf automake)
- '()))
+ (list autoconf
+ automake
+ gettext-minimal
+ libtool
+ pkg-config))
(inputs
(list fribidi
gd
@@ -1035,21 +1052,6 @@ This package contains the library database.")
libxft
libxml2
m17n-db))
- (arguments
- `(#:parallel-build? #f
- ,@(if (%current-target-system)
- '(#:phases
- (modify-phases %standard-phases
- ;; AC_FUNC_MALLOC and AC_FUNC_REALLOC usually unneeded
- ;; see
https://lists.gnu.org/archive/html/autoconf/2003-02/msg00017.html
- (add-after 'unpack 'fix-rpl_malloc
- (lambda _
- (substitute* "configure.ac"
- (("AC_FUNC_MALLOC") "")
- (("AC_FUNC_REALLOC") ""))
- ;; let bootstrap phase run.
- (delete-file "./configure")))))
- '())))
;; With `guix lint' the home-page URI returns a small page saying
;; that your browser does not handle frames. This triggers the "URI
;; returns suspiciously small file" warning.
