diff options
Diffstat (limited to 'oni/packages')
-rw-r--r-- | oni/packages/count-emails.scm | 4 | ||||
-rw-r--r-- | oni/packages/hlwm-run-or-raise.scm | 2 | ||||
-rw-r--r-- | oni/packages/inbox-size.scm | 2 | ||||
-rw-r--r-- | oni/packages/mpd-random-albums.scm | 44 | ||||
-rw-r--r-- | oni/packages/scsh.scm | 17 |
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"))))) + )) |