;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2016 Matthew Jordan <matthewjordandevops@yandex.com>
;;; Copyright © 2017 Vasile Dumitrascu <va511e@yahoo.com>
;;; Copyright © 2017 Stefan Reichör <stefan@xsteve.at>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Oleg Pykhalov <go.wigust@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu packages tmux)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #: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))


(define-public tmux
  (package
    (name "tmux")
    (version "3.0a")
    (source (origin
             (method url-fetch)
             (uri (string-append
                    "https://github.com/tmux/tmux/releases/download/"
                    version "/tmux-" version ".tar.gz"))
             (sha256
              (base32
               "1fcdbw77nz918f7gqc1ga7zlkp1g112in1h8kkjnkadgnhldzlaa"))))
    (build-system gnu-build-system)
    (inputs
     `(("libevent" ,libevent)
       ("ncurses" ,ncurses)))
    (home-page "https://tmux.github.io/")
    (synopsis "Terminal multiplexer")
    (description
     "tmux is a terminal multiplexer: it enables a number of terminals (or
windows), each running a separate program, to be created, accessed, and
controlled from a single screen.  tmux may be detached from a screen and
continue running in the background, then later reattached.")
    (license license:isc)))

(define-public tmux-themepack
  (let ((commit "03a372866f7677f7fe63bcee140b48b9fd372c48")
        (revision "1"))
    (package
      (name "tmux-themepack")
      (version (git-version "0.0.0" revision commit)) ; no version tags
      (source (origin
                (method git-fetch)
                (uri (git-reference
                      (url "https://github.com/jimeh/tmux-themepack.git")
                      (commit commit)))
                (sha256
                 (base32
                  "1d3k87mq5lca042jbap5kxskjy3kg79wjhhpnm6jacbn3anc67zl"))
                (file-name (git-file-name name version))))
      (build-system gnu-build-system)
      (arguments
       `(#:tests? #f                    ; no test suite
         #:phases (modify-phases %standard-phases
                    (delete 'configure)
                    (delete 'build)
                    (replace 'install
                      (lambda* (#:key outputs #:allow-other-keys)
                        (let* ((out (string-append
                                     (assoc-ref outputs "out")
                                     "/share/" ,name "-" ,version)))
                          (copy-recursively "." out)))))))
      (home-page "https://github.com/jimeh/tmux-themepack")
      (synopsis "Collection of themes for Tmux")
      (description "A collection of various<tr><td><span title='2015-12-25 23:51:08 -0500'>2015-12-25</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=8fa16f63e75c968e55274abffbc15d3184c66a15'>gnu: libev: Update source URL.</a><span class='msg-avail'>...</span></td><td>Leo Famulari</td></tr>
<tr><td><span title='2015-08-23 11:26:10 -0500'>2015-08-23</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=c808ca02ddc0eaac2c6b07e7814cdbb27437d64c'>gnu: Add libev.</a><span class='msg-avail'>...</span></td><td>Eric Dvorsak</td></tr>
<tr><td><span title='2015-03-04 17:23:27 +0100'>2015-03-04</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=ce0614ddb0c9aae46fba677a46392de8039c7086'>gnu: Move 'which' to (gnu packages base).</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2015-03-02 20:35:32 -0500'>2015-03-02</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=bbd0ea77ef13965475408c0e6152580cb16fd572'>gnu: libuv: Update to 1.4.2.</a><span class='msg-avail'>...</span></td><td>Mark H Weaver</td></tr>
<tr><td><span title='2015-01-07 16:48:50 +0100'>2015-01-07</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=3246cc91858a18344a6b62272521c88dd0ec5037'>gnu: Make libtool and libltdl completely separate.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2014-10-26 13:03:53 -0500'>2014-10-26</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=35b9e4232c1b59568c9a76630251c1ea6a330ac4'>gnu: Some cleanup based on lint checkers.</a><span class='msg-avail'>...</span></td><td>Eric Bavier</td></tr>
<tr><td><span title='2014-05-16 15:45:25 +0200'>2014-05-16</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=90f69c2ec598b7a94b7d35e4ce61bda245369b6d'>gnu: Add libuv.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2013-10-09 00:11:34 +0200'>2013-10-09</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=01eafd38fbeb49d8167d99569eb624ab404bbeb2'>gnu: Use the 'patches' field of &lt;origin&gt;.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2013-09-03 22:18:39 +0200'>2013-09-03</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=ee3e314bb7ba376c7e8c95c3da1f64ba07d57847'>gnu: python: Replace input python by python-wrapper.</a><span class='msg-avail'>...</span></td><td>Andreas Enge</td></tr>
<tr><td><span title='2013-01-20 22:54:36 +0100'>2013-01-20</span></td><td><a href='/guix/commit/gnu/packages/libevent.scm?id=6b32a64a4dd7ed9e82d885dfa7fbc28f59d54f23'>gnu: Add libevent.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
</table><ul class='pager'></ul></div> <!-- class=content -->
                         <div class=footer>generated by
                             <a href="https://git.zx2c4.com/cgit/about/">
                                 cgit
                             </a>
                         </div>
                        </div> <!-- id=cgit -->
</body>
</html>
 (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.

@code{xpanes} or @code{tmux-xpanes} (alias of @code{xpanes}) commands have
following features:

@itemize
@item Split tmux window into multiple panes.
@item Build command lines & execute them on the panes.
@item Runnable from outside of tmux session.
@item Runnable from inside of tmux session.
@item Record operation log.
@item Flexible layout arrangement for panes.
@item Display pane title on each pane.
@item Generate command lines from standard input (Pipe mode).
@end itemize")
    (license license:expat)))