Subject: [PATCH] gnu: tmsu: Improve installation
From: Stefan Reichör <[email-masked]>
To: [email-masked]
Cc: Stefan Reichör <[email-masked]>
Date: Mon, 15 Mar 2021 23:02:20 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

* gnu/packages/file-systems.scm (tmsu)[arguments]
  - Don't install go source files
  - Install as /bin/tmsu instead as /bin/TMSU
---
 gnu/packages/file-systems.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/file-systems.scm b/gnu/packages/file-systems.scm
index e7d78e41fb..198653c639 100644
--- a/gnu/packages/file-systems.scm
+++ b/gnu/packages/file-systems.scm
@@ -7,6 +7,7 @@
 ;;; Copyright © 2020 Raghav Gururajan <[email-masked]>
 ;;; Copyright © 2020 Morgan Smith <[email-masked]>
 ;;; Copyright © 2021 raid5atemyhomework <[email-masked]>
+;;; Copyright © 2021 Stefan Reichör <[email-masked]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1174,7 +1175,16 @@ local file system using FUSE.")
     (build-system go-build-system)
     (arguments
      `(#:import-path "github.com/oniony/TMSU"
-       #:unpack-path ".."))
+       #:unpack-path ".."
+       #:install-source? #f
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'install 'post-install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out")))
+               ;; The go build system produces /bin/TMSU -> install as /bin/tmsu
+               (rename-file (string-append out "/bin/TMSU")
+                            (string-append out "/bin/tmsu"))))))))
     (inputs
      `(("go-github-com-mattn-go-sqlite3" ,go-github-com-mattn-go-sqlite3)
        ("go-github-com-hanwen-fuse" ,go-github-com-hanwen-fuse)))
-- 
2.25.1