summaryrefslogtreecommitdiff
path: root/modules/freya/packages/gnome-xyz.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/freya/packages/gnome-xyz.scm')
-rw-r--r--modules/freya/packages/gnome-xyz.scm57
1 files changed, 56 insertions, 1 deletions
diff --git a/modules/freya/packages/gnome-xyz.scm b/modules/freya/packages/gnome-xyz.scm
index d05abf1..6be7624 100644
--- a/modules/freya/packages/gnome-xyz.scm
+++ b/modules/freya/packages/gnome-xyz.scm
@@ -1,11 +1,12 @@
(define-module (freya packages gnome-xyz)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix gexp)
+ #:use-module (gnu packages)
#:use-module (gnu packages base)
#:use-module (gnu packages version-control)
#:use-module (gnu packages web)
#:use-module (gnu packages bash)
- #:use-module (gnu packages)
+ #:use-module (gnu packages compression)
#:use-module (guix packages)
#:use-module (guix git-download)
#:use-module (guix download)
@@ -63,3 +64,57 @@
(description "Lavanda gtk theme for linux desktops")
(license license:gpl3))))
+(define-public mint-themes
+ (package
+ (name "mint-themes")
+ (version "2.1.7")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "http://packages.linuxmint.com/pool/main/m/mint-themes/mint-themes_"
+ version "_all.deb"))
+ (sha256
+ (base32
+ "19d6b8pr45ga038cvqisa9hvgd3frys2wf218am3hrmair4r27bf"))
+ (file-name "source.deb")))
+ (build-system trivial-build-system)
+ (native-inputs
+ (list binutils
+ tar
+ xz))
+ (arguments
+ '(#:modules ((guix build utils))
+ #:builder
+ (begin
+ (use-modules (guix build utils))
+ (let* ((source (assoc-ref %build-inputs "source"))
+ (bin (string-append
+ (assoc-ref %outputs "out")
+ "/share/themes"))
+ (cwd (getcwd))
+ (deb (string-append cwd
+ "/source.deb"))
+ (data (string-append cwd
+ "/data.tar.xz"))
+ (themes (string-append cwd
+ "/usr/share/themes"))
+ (ar (string-append
+ (assoc-ref %build-inputs "binutils")
+ "/bin/ar"))
+ (tar (string-append
+ (assoc-ref %build-inputs "tar")
+ "/bin/tar"))
+ (xz-bin (string-append
+ (assoc-ref %build-inputs "xz")
+ "/bin")))
+ (setenv "PATH" (string-append (getenv "PATH") ":" xz-bin))
+ (copy-file source deb)
+ (invoke ar "x" deb "--output" cwd)
+ (invoke tar "xf" data "-C" cwd)
+ (mkdir-p bin)
+ (copy-recursively themes bin)))))
+ (home-page "https://github.com/linuxmint/mint-themes")
+ (synopsis "A collection of Mint themes.")
+ (description "A collection of Mint themes.")
+ (license license:gpl3+)))
+