* gnu/packages/terminals.scm (termite): New variable. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
		
			
				
	
	
		
			123 lines
		
	
	
	
		
			4.9 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
			
		
		
	
	
			123 lines
		
	
	
	
		
			4.9 KiB
		
	
	
	
		
			Scheme
		
	
	
	
	
	
| ;;; GNU Guix --- Functional package management for GNU
 | |
| ;;; Copyright © 2015 Efraim Flashner <efraim@flashner.co.il>
 | |
| ;;; Copyright © 2016 Mckinley Olsen <mck.olsen@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 terminals)
 | |
|   #:use-module ((guix licenses) #:prefix license:)
 | |
|   #:use-module (guix build utils)
 | |
|   #:use-module (guix build-system gnu)
 | |
|   #:use-module (guix download)
 | |
|   #:use-module (guix git-download)
 | |
|   #:use-module (guix packages)
 | |
|   #:use-module (gnu packages autotools)
 | |
|   #:use-module (gnu packages gettext)
 | |
|   #:use-module (gnu packages glib)
 | |
|   #:use-module (gnu packages gnome)
 | |
|   #:use-module (gnu packages gtk)
 | |
|   #:use-module (gnu packages pkg-config)
 | |
|   #:use-module (gnu packages wm)
 | |
|   #:use-module (gnu packages ncurses)
 | |
|   #:use-module (gnu packages gtk)
 | |
|   #:use-module (gnu packages gnome))
 | |
| 
 | |
| (define-public tilda
 | |
|   (package
 | |
|     (name "tilda")
 | |
|     (version "1.3.1")
 | |
|     (source (origin
 | |
|               (method url-fetch)
 | |
|               (uri (string-append "https://github.com/lanoxx/tilda/archive/"
 | |
|                                   "tilda-" version ".tar.gz"))
 | |
|               (sha256
 | |
|                (base32
 | |
|                 "1nh0kw8f6srriglj55gmir1hvakcwrak1wcydz3vpnmwipgy6jib"))))
 | |
|     (build-system gnu-build-system)
 | |
|     (arguments
 | |
|      `(#:phases (modify-phases %standard-phases
 | |
|                  (add-before 'patch-source-shebangs 'autogen
 | |
|                   (lambda _       ; Avoid running ./configure.
 | |
|                    (substitute* "autogen.sh"
 | |
|                                 (("^.*\\$srcdir/configure.*") ""))
 | |
|                    (zero? (system* "sh" "autogen.sh")))))))
 | |
|     (native-inputs
 | |
|      `(("autoconf" ,autoconf)
 | |
|        ("automake" ,automake)
 | |
|        ("gettext" ,gnu-gettext)
 | |
|        ("pkg-config" ,pkg-config)))
 | |
|     (inputs
 | |
|      `(("glib" ,glib "bin")
 | |
|        ("gtk+" ,gtk+)
 | |
|        ("libconfuse" ,libconfuse)
 | |
|        ("vte" ,vte)))
 | |
|     (synopsis "GTK+-based drop-down terminal")
 | |
|     (description "Tilda is a terminal emulator similar to normal terminals like
 | |
| gnome-terminal (GNOME) or Konsole (KDE), with the difference that it drops down
 | |
| from the edge of a screen when a certain configurable hotkey is pressed.  This
 | |
| is similar to the built-in consoles in some applications.  Tilda is highly
 | |
| configureable through a graphical wizard.")
 | |
|     (home-page "https://github.com/lanoxx/tilda")
 | |
|     (license license:gpl2+)))
 | |
| 
 | |
| (define-public termite
 | |
|   (package
 | |
|     (name "termite")
 | |
|     (version "11")
 | |
|     (source
 | |
|       (origin
 | |
|         (method git-fetch)
 | |
|         (uri (git-reference
 | |
|               (url (string-append "https://github.com/thestinger/"
 | |
|                                   name ".git"))
 | |
|               (commit (string-append "v" version))
 | |
|               (recursive? #t)))
 | |
|         (file-name (string-append name "-" version "-checkout"))
 | |
|         (sha256
 | |
|           (base32
 | |
|             "1cw4yw7n9m2si8b7zcfyz9pyihncabxm5g39v1mxslfajxgwzmd8"))))
 | |
|     (build-system gnu-build-system)
 | |
|     (arguments
 | |
|       `(#:phases (alist-delete 'configure %standard-phases)
 | |
|         #:tests? #f
 | |
|         ;; This sets the destination when installing the necessary terminal
 | |
|         ;; capability data, which are not provided by 'ncurses'.  See
 | |
|         ;; <https://lists.gnu.org/archive/html/bug-ncurses/2009-10/msg00031.html>.
 | |
|         #:make-flags (list "PREFIX="
 | |
|                            (string-append "VERSION=v" (version))
 | |
|                            (string-append "DESTDIR="
 | |
|                                           (assoc-ref %outputs "out")))))
 | |
|     (inputs
 | |
|      `(("vte", vte-ng)
 | |
|        ("gtk+", gtk+)
 | |
|        ("ncurses", ncurses)))
 | |
|     (native-inputs
 | |
|      `(("pkg-config" ,pkg-config)))
 | |
| 
 | |
|     ;; FIXME: This should only be located in 'ncurses'.  Nonetheless it is
 | |
|     ;; provided for usability reasons.  See <https://bugs.gnu.org/22138>.
 | |
|     (native-search-paths
 | |
|       (list (search-path-specification
 | |
|               (variable "TERMINFO_DIRS")
 | |
|               (files '("share/terminfo")))))
 | |
|     (home-page "https://github.com/thestinger/termite/")
 | |
|     (synopsis "Keyboard-centric, VTE-based terminal")
 | |
|     (description "Termite is a minimal terminal emulator designed for use with
 | |
| tiling window managers.  It is a modal application, similar to Vim, with an
 | |
| insert mode and command mode where keybindings have different functions.")
 | |
| 
 | |
|     ;; Files under util/ are under the Expat license; the rest is LGPLv2+.
 | |
|     (license license:lgpl2.0+)))
 |