Add beep command.
--
José Miguel Sánchez García
From 62188944da4e42ed46662ca2cc812cced70b0aed Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jos=C3=A9=20Miguel=20S=C3=A1nchez=20Garc=C3=ADa?=
<jm...@openmailbox.org>
Date: Mon, 2 Jan 2017 20:52:24 +0100
Subject: [PATCH] gnu: Add beep.
* gnu/packages/terminals.scm (beep): New variable.
---
gnu/packages/terminals.scm | 28 +++++++++++++++++++++++++++-
1 file changed, 27 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/terminals.scm b/gnu/packages/terminals.scm
index 52767ba6c..641725bda 100644
--- a/gnu/packages/terminals.scm
+++ b/gnu/packages/terminals.scm
@@ -4,7 +4,7 @@
;;; Copyright © 2016 Alex Griffin <a...@ajgrf.com>
;;; Copyright © 2016 David Craven <da...@craven.ch>
;;; Copyright © 2016 Ludovic Courtès <l...@gnu.org>
-;;; Copyright © 2016 José Miguel Sánchez GarcÃa <jm...@openmailbox.org>
+;;; Copyright © 2017 José Miguel Sánchez GarcÃa <jm...@openmailbox.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -326,3 +326,29 @@ configuration, testing, and debugging tool. It has also serves well
as a low-tech serial communications program to allow access to all
types of devices that provide serial consoles.")
(license license:gpl2+)))
+
+(define-public beep
+ (package
+ (name "beep")
+ (version "1.3")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "http://www.johnath.com/" name "/"
+ name "-" version ".tar.gz"))
+ (sha256
+ (base32 "0bgch6jq5cahakk3kbr9549iysf2dik09afixxy5brbxk1xfzb2r"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f ; No tests.
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (add-after 'unpack 'patch-makefile ; It doesn't install without this
+ (lambda _
+ (mkdir-p (string-append (assoc-ref %outputs "out") "/bin"))
+ (mkdir-p (string-append (assoc-ref %outputs "out") "/man/man1"))
+ (substitute* "Makefile" (("/usr") (assoc-ref %outputs "out"))))))))
+ (synopsis "Command line utility for Linux that beeps the PC speaker.")
+ (description "Command line utility for Linux that beeps the PC speaker.")
+ (home-page "http://www.johnath.com/beep")
+ (license license:gpl2+)))
--
2.11.0