01/01: gnu: docker-cli: Install shell completion.

[guix-commits]

wigust pushed a commit to branch master
in repository guix.

commit 449dc8b749836536668d528e4f03c911f88d2855
Author: Oleg Pykhalov <address@hidden>
Date:   Sat Dec 7 12:28:59 2019 +0300

    gnu: docker-cli: Install shell completion.
    
    * gnu/packages/docker.scm (docker-cli)[arguments]: Install shell completion.
---
 gnu/packages/docker.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/docker.scm b/gnu/packages/docker.scm
index 70d2062..948cc30 100644
--- a/gnu/packages/docker.scm
+++ b/gnu/packages/docker.scm
@@ -617,7 +617,15 @@ provisioning etc.")
          (replace 'install
            (lambda* (#:key outputs #:allow-other-keys)
              (let* ((out (assoc-ref outputs "out"))
-                    (out-bin (string-append out "/bin")))
+                    (out-bin (string-append out "/bin"))
+                    (etc (string-append out "/etc")))
+               (with-directory-excursion 
"src/github.com/docker/cli/contrib/completion"
+                 (install-file "bash/docker"
+                               (string-append etc "/bash_completion.d"))
+                 (install-file "fish/docker.fish"
+                               (string-append etc "/fish/completions"))
+                 (install-file "zsh/_docker"
+                               (string-append etc "/zsh/site-functions")))
                (chdir "build")
                (install-file "docker" out-bin)
                #t))))))