1 files changed, 18 insertions(+), 0 deletions(-)

M gnu/packages/containers.scm

@@ 46,6 46,7 @@
   #:use-module (gnu packages compression)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages gcc)
+  #:use-module (gnu packages gettext)
   #:use-module (gnu packages gnupg)
   #:use-module (gnu packages golang)
   #:use-module (gnu packages guile)


@@ 468,6 469,9 @@ Its main purpose is to support the key usage by @code{docker-init}:
   (package
     (name "podman")
     (version "5.3.1")
+    (outputs '("out" "docker"))
+    (properties
+      `((output-synopsis "docker" "docker alias for podman")))
     (source
      (origin
        (method git-fetch)


@@ 540,6 544,19 @@ Its main purpose is to support the key usage by @code{docker-init}:
                    ,(string-append #$passt          "/bin")
                    ,(string-append #$procps         "/bin") ; ps
                    "/run/privileged/bin")))))
+          (add-after 'install 'install-docker
+            (lambda* (#:key outputs #:allow-other-keys)
+              (let* ((docker (assoc-ref outputs "docker")))
+                ;; So it picks podman of the other output.
+                (let ((bin-dir (string-append (assoc-ref outputs "out")
+                                              "/bin")))
+                  (substitute* "docker/docker.in"
+                   (("[$][{]BINDIR[}]") bin-dir)
+                   (("[$][{]ETCDIR[}]") "/etc")))
+                (invoke "make" "install.docker"
+                        (string-append "PREFIX=" (assoc-ref outputs "docker"))
+                        (string-append "ETCDIR=" (string-append (assoc-ref outputs "docker")
+                                                                "/etc"))))))
           (add-after 'install 'install-completions
             (lambda _
               (invoke "make" "install.completions"


@@ 558,6 575,7 @@ Its main purpose is to support the key usage by @code{docker-init}:
            git-minimal/pinned
            go-1.22
            go-github-com-go-md2man
+           gnu-gettext ; for envsubst
            mandoc
            pkg-config
            python))