aboutsummaryrefslogtreecommitdiffstats
path: root/oni/packages
diff options
context:
space:
mode:
Diffstat (limited to 'oni/packages')
-rw-r--r--oni/packages/count-emails.scm4
-rw-r--r--oni/packages/hlwm-run-or-raise.scm2
-rw-r--r--oni/packages/inbox-size.scm2
-rw-r--r--oni/packages/mpd-random-albums.scm44
-rw-r--r--oni/packages/scsh.scm17
5 files changed, 65 insertions, 4 deletions
diff --git a/oni/packages/count-emails.scm b/oni/packages/count-emails.scm
index e6b70f2..faba330 100644
--- a/oni/packages/count-emails.scm
+++ b/oni/packages/count-emails.scm
@@ -5,7 +5,7 @@
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
- #:use-module (gnu packages shells)
+ #:use-module (oni packages scsh)
#:use-module (gnu packages mail))
(define-public count-emails
@@ -24,7 +24,7 @@
(base32 "0pv4wbxbg0szs2jiskmxvivrq44ha5ljdn18j3j2pi8q1dp9rmb3"))
(file-name (git-file-name name version))))
(propagated-inputs
- (list bash scsh notmuch))
+ (list scsh notmuch))
(build-system gnu-build-system)
(arguments
`(#:tests? #f
diff --git a/oni/packages/hlwm-run-or-raise.scm b/oni/packages/hlwm-run-or-raise.scm
index 29cac46..a2fe254 100644
--- a/oni/packages/hlwm-run-or-raise.scm
+++ b/oni/packages/hlwm-run-or-raise.scm
@@ -4,7 +4,7 @@
#:use-module (guix build-system gnu)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages base)
- #:use-module (gnu packages shells)
+ #:use-module (oni packages scsh)
#:use-module (gnu packages xdisorg)
#:use-module (gnu packages gawk)
#:use-module (oni packages hlwm-switch-to-window))
diff --git a/oni/packages/inbox-size.scm b/oni/packages/inbox-size.scm
index 6896446..8e6802a 100644
--- a/oni/packages/inbox-size.scm
+++ b/oni/packages/inbox-size.scm
@@ -5,7 +5,7 @@
#:use-module ((guix licenses) #:prefix license:)
#:use-module (gnu packages base)
#:use-module (gnu packages bash)
- #:use-module (gnu packages shells))
+ #:use-module (oni packages scsh))
(define-public (inbox-size emacs)
(let ((commit "e9a94db05e45be9357ccc757601c1cd890a6254c")
diff --git a/oni/packages/mpd-random-albums.scm b/oni/packages/mpd-random-albums.scm
new file mode 100644
index 0000000..d8e7f03
--- /dev/null
+++ b/oni/packages/mpd-random-albums.scm
@@ -0,0 +1,44 @@
+(define-module (oni packages mpd-random-albums)
+ #:use-module ((guix licenses) #:prefix license:)
+ #:use-module (gnu packages base)
+ #:use-module (gnu packages bash)
+ #:use-module (gnu packages mpd)
+ #:use-module (guix build-system gnu)
+ #:use-module (guix git-download)
+ #:use-module (guix packages)
+ #:use-module (oni packages scsh))
+
+(define-public mpd-random-albums
+ (let ((commit "c12a766e1920e726129dfd1161a2ef15471f89e8")
+ (revision "0"))
+ (package
+ (name "mpd-random-albums")
+ (version (git-version "0.0.0" revision commit))
+ (source
+ (origin
+ (uri (git-reference
+ (url "git://ryuslash.org/util/tom/mpd-random-albums")
+ (commit commit)))
+ (method git-fetch)
+ (sha256
+ (base32 "0mgs9377hw3x1nfcah3wwr3zijvzrkqicvgrbcjl3g1p4fmlb8mr"))
+ (file-name (git-file-name name version))))
+ (propagated-inputs
+ (list mpd bash scsh))
+ (build-system gnu-build-system)
+ (arguments
+ `(#:tests? #f
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (delete 'build)
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((bin (string-append (assoc-ref outputs "out") "/bin"))
+ (site (string-append (assoc-ref outputs "out") "/share/scsh-0.7")))
+ (install-file "mpd-random-albums" bin)
+ (install-file "mpd.scm" site)))))))
+ (home-page "https://ryuslash.org/")
+ (synopsis "A simple script that populates the MPD playlist with all of my albums in random order.")
+ (description "Creates a new playlist in MPD with all of the albums in my database and shuffles them by album.")
+ (license license:gpl3+))))
diff --git a/oni/packages/scsh.scm b/oni/packages/scsh.scm
new file mode 100644
index 0000000..6f76555
--- /dev/null
+++ b/oni/packages/scsh.scm
@@ -0,0 +1,17 @@
+(define-module (oni packages scsh)
+ #:use-module ((guix licenses) #:prefix license:)
+ #:use-module (gnu packages autotools)
+ #:use-module ((gnu packages shells) #:prefix shells:)
+ #:use-module (guix build-system gnu)
+ #:use-module (guix git-download)
+ #:use-module (guix packages))
+
+(define-public scsh
+ (package
+ (inherit shells:scsh)
+ ;; (native-search-paths
+ ;; (list (search-path-specification
+ ;; (variable "SCSH_LIB_DIRS")
+ ;; (separator #f)
+ ;; (files '("share/scsh-0.7")))))
+ ))