From: Tobias Geerinckx-Rice via Guix-patches via <guix-patches@gnu.org>
To: 38355@debbugs.gnu.org
Subject: [bug#38355] [PATCH] gnu: Add scanbd.
Date: Sun, 24 Nov 2019 01:42:19 +0100 [thread overview]
Message-ID: <20191124004219.16428-1-me@tobias.gr> (raw)
* gnu/packages/scanner.scm (scanbd): New public variable.
---
gnu/packages/scanner.scm | 65 ++++++++++++++++++++++++++++++++++++++++
1 file changed, 65 insertions(+)
diff --git a/gnu/packages/scanner.scm b/gnu/packages/scanner.scm
index 98f7fd203a..25389f19aa 100644
--- a/gnu/packages/scanner.scm
+++ b/gnu/packages/scanner.scm
@@ -24,10 +24,13 @@
#:use-module (gnu packages)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages ghostscript)
+ #:use-module (gnu packages glib)
#:use-module (gnu packages gtk)
#:use-module (gnu packages image)
#:use-module (gnu packages libusb)
+ #:use-module (gnu packages linux)
#:use-module (gnu packages pkg-config)
+ #:use-module (gnu packages textutils)
#:use-module (guix build-system gnu)
#:use-module (guix download)
#:use-module (guix git-download)
@@ -154,6 +157,68 @@ proving access to any raster image scanner hardware (flatbed scanner,
hand-held scanner, video- and still-cameras, frame-grabbers, etc.). The
package contains the library and drivers.")))
+(define-public scanbd
+ (package
+ (name "scanbd")
+ (version "1.5.1")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "mirror://sourceforge/scanbd/releases/"
+ "scanbd-" version ".tgz"))
+ (sha256
+ (base32 "0pvy4qirfjdfm8aj6x5rkbgl7hk3jfa2s21qkk8ic5dqfjjab75n"))))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:configure-flags
+ (list "--disable-debug"
+ "--sysconfdir=/etc")
+ #:phases
+ (modify-phases %standard-phases
+ (replace 'install
+ (lambda* (#:key make-flags outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (conf (string-append out "/etc/scanbd")))
+ (apply invoke "make" "install"
+ ;; Install example configuration to the store, not /etc.
+ ;; These don't inherit from each other, so we need both.
+ (string-append "scanbdconfdir=" conf)
+ (string-append "scannerconfdir=" conf "/scanner.d")
+ make-flags)
+ #t)))
+ (add-after 'install 'install-extra-documentation
+ ;; The README provides more detailed set-up instructions than the
+ ;; man page.
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (doc (string-append out "/share/doc/"
+ ,name "-" ,version)))
+ (install-file "doc/README.txt" doc)
+ #t))))))
+ (native-inputs
+ `(("pkg-config" ,pkg-config)))
+ (inputs
+ `(("dbus" ,dbus)
+ ("libconfuse" ,libconfuse)
+ ("sane-backends" ,sane-backends)
+ ("udev" ,eudev)))
+ (home-page "https://scanbd.sourceforge.io")
+ (synopsis "Configurable scanner button monitor")
+ (description
+ "Scanbd stands for scanner button daemon. It regulary polls scanners for
+pressed buttons, function knob changes, or other events such as (un)plugging
+the scanner or inserting and removing paper. Then it performs the desired
+action(s) such as saving, copying, or e-mailing the image.
+
+Actions can be fully customised through scripts, based on any combination of
+switch or knob settings. Events are also signaled over D-Bus and scans can
+even be triggered over D-Bus from foreign applications.
+
+Scanbd talks to scanners through the @acronym{SANE, Scanner Access Now Easy}
+back-end library. This means that it supports almost all existing scanners,
+provided the driver also exposes the buttons.")
+ (license licence:gpl2+)))
+
(define-public xsane
(package
(name "xsane")
--
2.23.0
next reply other threads:[~2019-11-24 0:44 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2019-11-24 0:42 Tobias Geerinckx-Rice via Guix-patches via [this message]
2019-12-11 10:58 ` [bug#38355] [PATCH] gnu: Add scanbd Ludovic Courtès
2021-01-10 22:09 ` Maxim Cournoyer
2021-08-03 19:16 ` bug#38355: " Maxim Cournoyer
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20191124004219.16428-1-me@tobias.gr \
--to=guix-patches@gnu.org \
--cc=38355@debbugs.gnu.org \
--cc=me@tobias.gr \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).