~ruther/guix-local

ff9d32df33dc80e5a04bdff80f780cb09f726006 — Nicolas Graves 2 years ago af2735e
gnu: beep: Add phase install-rules.

* gnu/packages/terminals.scm (beep): Add phase install-rules.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
1 files changed, 12 insertions(+), 1 deletions(-)

M gnu/packages/terminals.scm
M gnu/packages/terminals.scm => gnu/packages/terminals.scm +12 -1
@@ 603,7 603,18 @@ to all types of devices that provide serial consoles.")
                     ;; The build environment lacks /dev/{console,tty*}.
                     ;; In fact, even nckx's regular Guix System lacks ttyS1…
                     ((": Permission denied")
                      ": No such file or directory")))))))
                      ": No such file or directory"))))
               (add-before 'install 'install-rules
                 (lambda _
                   (mkdir-p (string-append #$output "/etc/udev/rules.d"))
                   (with-output-to-file
                       (string-append #$output
                                      "/etc/udev/rules.d/70-pcspkr-beep.rules")
                     (lambda _
                       (display (string-append "\
ACTION==\"add\", SUBSYSTEM==\"input\", ATTRS{name}==\"PC Speaker\", "
                                               "ENV{DEVNAME}!=\"\", "
                                               "TAG+=\"uaccess\"")))))))))
    (synopsis "Linux command-line utility to control the PC speaker")
    (description "beep allows the user to control the PC speaker with precision,
allowing different sounds to indicate different events.  While it can be run