unofficial mirror of guix-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH] gnu: Add beep.
@ 2017-01-02 19:10 José Miguel Sánchez García
  2017-01-02 19:33 ` José Miguel Sánchez García
  0 siblings, 1 reply; 5+ messages in thread
From: José Miguel Sánchez García @ 2017-01-02 19:10 UTC (permalink / raw)
  To: guix-devel

[-- Attachment #1: Type: text/plain, Size: 55 bytes --]

Add beep command.

-- 
José Miguel Sánchez García

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-gnu-Add-beep.patch --]
[-- Type: text/x-diff; name=0001-gnu-Add-beep.patch, Size: 2309 bytes --]

From 62188944da4e42ed46662ca2cc812cced70b0aed Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jos=C3=A9=20Miguel=20S=C3=A1nchez=20Garc=C3=ADa?=
 <jmi2k@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 <david@craven.ch>
 ;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
-;;; Copyright © 2016 José Miguel Sánchez García <jmi2k@openmailbox.org>
+;;; Copyright © 2017 José Miguel Sánchez García <jmi2k@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


^ permalink raw reply related	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2017-01-05 12:17 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2017-01-02 19:10 [PATCH] gnu: Add beep José Miguel Sánchez García
2017-01-02 19:33 ` José Miguel Sánchez García
2017-01-04  7:10   ` Tobias Geerinckx-Rice
2017-01-04 22:32     ` José Miguel Sánchez García
2017-01-05 12:18       ` Tobias Geerinckx-Rice

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).