guix_mirror_bot pushed a commit to branch master
in repository guix.

commit 66e28d9db1f5176cf3b8c00d451909c5902d52e8
Author: Maxim Cournoyer <ma...@guixotic.coop>
AuthorDate: Tue Jul 22 13:07:39 2025 +0900

    gnu: Remove leptonica-1.80.
    
    * gnu/packages/image.scm (leptonica-1.80): Delete variable.
    
    Change-Id: Id96625556ec3c4a3c10bbe8f534548d7d2aad892
---
 gnu/packages/image.scm | 33 ---------------------------------
 1 file changed, 33 deletions(-)

diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm
index da105c1b17..1598d33046 100644
--- a/gnu/packages/image.scm
+++ b/gnu/packages/image.scm
@@ -890,39 +890,6 @@ scale and pixel depth, and pixelwise masking, blending, 
enhancement, and
 arithmetic ops.")
     (license license:bsd-2)))
 
-(define-public leptonica-1.80
-  (package
-    (inherit leptonica)
-    (name "leptonica")
-    (version "1.80.0")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/DanBloomberg/leptonica";)
-                    (commit version)))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "12ddln72z5l3icz0i9rpsfkg5xik8fcwcn8lb0cp3jigjxi8gvkg"))))
-    (arguments
-     (substitute-keyword-arguments (package-arguments leptonica)
-       ((#:tests? _ #t)
-        ;; The pngio_reg test fails, probably because the libpng used is
-        ;; newer.
-        #f)
-       ((#:phases phases '%standard-phases)
-        #~(modify-phases #$phases
-            (replace 'provide-absolute-giflib-reference
-              (lambda _
-                (let ((giflib #$(this-package-input "giflib")))
-                  ;; Add an absolute reference to giflib to avoid propagation.
-                  ;; This is the same as for the parent package, but at that
-                  ;; time the file name was 'liblept.la, not libleptonica.la.
-                  (with-directory-excursion (string-append #$output "/lib")
-                    (substitute* '("liblept.la" "pkgconfig/lept.pc")
-                      (("-lgif")
-                       (string-append "-L" giflib "/lib -lgif")))))))))))))
-
 (define-public jbig2dec
   (package
     (name "jbig2dec")

Reply via email to