From 4426a2accba60acaee2240e97e62c6615d29a0ac Mon Sep 17 00:00:00 2001
From: Hugo Buddelmeijer <hugo@buddelmeijer.nl>
Date: Sat, 14 Feb 2026 22:49:13 +0100
Subject: gnu: fcrackzip: Fix build through make-flags.

* gnu/packages/compression.scm (fcrackzip): Fix build.
[source]: Switch to https.
[arguments]: Switch to gexps.
<#:make-flags>: Add "CFLAGS=-Wno-error=implicit-int"
<#:phases>{fix-reference-to-unzip}: New phase.
[home-page]: Switch to https.

Change-Id: Icaa3f415dc184c231188973108a442f39f13c4a4
Signed-off-by: Andreas Enge <andreas@enge.fr>
---
 gnu/packages/compression.scm | 20 ++++++++++++--------
 1 file changed, 12 insertions(+), 8 deletions(-)

(limited to 'gnu')

diff --git a/gnu/packages/compression.scm b/gnu/packages/compression.scm
index 8dd62f46f7a..c36d13ffcab 100644
--- a/gnu/packages/compression.scm
+++ b/gnu/packages/compression.scm
@@ -88,6 +88,7 @@
   #:use-module (gnu packages curl)
   #:use-module (gnu packages documentation)
   #:use-module (gnu packages file)
+  #:use-module (gnu packages gcc)
   #:use-module (gnu packages gettext)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages gnome)
@@ -3071,7 +3072,7 @@ compression and decompression speed compared to Deflate using Zlib.")
     (version "1.0")
     (source (origin
               (method url-fetch)
-              (uri (string-append "http://oldhome.schmorp.de/marc/data/"
+              (uri (string-append "https://oldhome.schmorp.de/marc/data/"
                                   "fcrackzip-" version ".tar.gz"))
               (sha256
                (base32
@@ -3079,16 +3080,19 @@ compression and decompression speed compared to Deflate using Zlib.")
     (build-system gnu-build-system)
     (arguments
      (list
+      #:make-flags
+      #~(list "CFLAGS=-Wno-error=implicit-int")
       #:phases
-      '(modify-phases %standard-phases
-         (add-after 'unpack 'fix-reference-to-unzip
-           (lambda _
-             (substitute* "main.c"
-               (("\"unzip")
-                (string-append "\"" (which "unzip")))))))))
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'fix-reference-to-unzip
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "main.c"
+                (("\"unzip")
+                 (string-append "\""
+                                (search-input-file inputs "/bin/unzip")))))))))
     (inputs
      (list perl unzip))
-    (home-page "http://oldhome.schmorp.de/marc/fcrackzip.html")
+    (home-page "https://oldhome.schmorp.de/marc/fcrackzip.html")
     (synopsis "Zip password cracker")
     (description "Fcrackzip is a Zip file password cracker.")
     (license license:gpl2+)))
-- 
cgit v1.3