01/01: gnu: Add tmux-xpanes.

[guix-commits]

wigust pushed a commit to branch master
in repository guix.

commit e80a809f1fca1bc8580a9ab24fc071b822f65e7e
Author: Oleg Pykhalov <address@hidden>
Date:   Sun Mar 10 18:30:12 2019 +0300

    gnu: Add tmux-xpanes.
    
    * gnu/packages/tmux.scm (tmux-xpanes): New variable.
---
 gnu/packages/tmux.scm | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)

diff --git a/gnu/packages/tmux.scm b/gnu/packages/tmux.scm
index e09e6c1..7dbe212 100644
--- a/gnu/packages/tmux.scm
+++ b/gnu/packages/tmux.scm
@@ -5,6 +5,7 @@
 ;;; Copyright © 2017 Vasile Dumitrascu <address@hidden>
 ;;; Copyright © 2017 Stefan Reichör <address@hidden>
 ;;; Copyright © 2019 Tobias Geerinckx-Rice <address@hidden>
+;;; Copyright © 2019 Oleg Pykhalov <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -27,7 +28,9 @@
   #:use-module (guix download)
   #:use-module (guix git-download)
   #:use-module (guix build-system gnu)
+  #:use-module (guix build-system trivial)
   #:use-module (gnu packages)
+  #:use-module (gnu packages bash)
   #:use-module (gnu packages libevent)
   #:use-module (gnu packages ncurses))
 
@@ -134,3 +137,50 @@ continue running in the background, then later 
reattached.")
 command and helper commands provided by tmuxifier to manage Tmux sessions and
 windows.")
     (license expat)))
+
+(define-public tmux-xpanes
+  (package
+    (name "tmux-xpanes")
+    (version "4.0.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://github.com/greymd/tmux-xpanes.git";)
+                    (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0px164ikhnzfls6dld4xhiyd9j5jp2rbmwfg11b1pxzm9mp7qk6r"))))
+    (build-system trivial-build-system)
+    (inputs
+     `(("bash" ,bash)))
+    (arguments
+     `(#:modules ((guix build utils))
+       #:builder
+       (begin
+         (use-modules (guix build utils))
+         (setenv "PATH" (string-append (assoc-ref %build-inputs "bash") 
"/bin"))
+         (copy-recursively (assoc-ref %build-inputs "source") ".")
+         (substitute* "bin/xpanes"
+           (("/bin/bash") (which "bash")))
+         (install-file "bin/xpanes" (string-append %output "/bin"))
+         (install-file "man/xpanes.1" (string-append %output "/man/man1"))
+         #t)))
+    (home-page "https://github.com/greymd/tmux-xpanes";)
+    (synopsis "Tmux based terminal divider")
+    (description "This package provides tmux-based terminal divider.
+
address@hidden or @code{tmux-xpanes} (alias of @code{xpanes}) commands have
+following features:
+
address@hidden
address@hidden Split tmux window into multiple panes.
address@hidden Build command lines & execute them on the panes.
address@hidden Runnable from outside of tmux session.
address@hidden Runnable from inside of tmux session.
address@hidden Record operation log.
address@hidden Flexible layout arrangement for panes.
address@hidden Display pane title on each pane.
address@hidden Generate command lines from standard input (Pipe mode).
address@hidden itemize")
+    (license expat)))