[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: dolphin-emu: Shorten the source snippet.
From: |
Efraim Flashner |
Subject: |
02/02: gnu: dolphin-emu: Shorten the source snippet. |
Date: |
Thu, 22 Feb 2018 14:03:29 -0500 (EST) |
efraim pushed a commit to branch master
in repository guix.
commit 85280804056c1c3acc2da39bcc5f2647a8535939
Author: Efraim Flashner <address@hidden>
Date: Thu Feb 22 20:42:11 2018 +0200
gnu: dolphin-emu: Shorten the source snippet.
* gnu/packages/emulators.scm (dolphin-emu): Rewrite the source snippet
to be more compact.
---
gnu/packages/emulators.scm | 40 +++++++++++++---------------------------
1 file changed, 13 insertions(+), 27 deletions(-)
diff --git a/gnu/packages/emulators.scm b/gnu/packages/emulators.scm
index 530ef7d..d55e68d 100644
--- a/gnu/packages/emulators.scm
+++ b/gnu/packages/emulators.scm
@@ -119,33 +119,19 @@
(url "https://github.com/dolphin-emu/dolphin.git")
(commit commit)))
(file-name (git-file-name name version))
- (modules '((guix build utils)))
- (snippet
- '(begin
- (for-each delete-file-recursively
- ;; Remove external stuff we don't need.
- '("Externals/LZO"
- "Externals/OpenAL"
- "Externals/Qt"
- "Externals/SFML"
- "Externals/SOIL"
- "Externals/curl"
- "Externals/ffmpeg"
- "Externals/gettext"
- "Externals/hidapi"
- "Externals/libpng"
- "Externals/libusb"
- "Externals/mbedtls"
- "Externals/miniupnpc"
- "Externals/wxWidgets3"
- "Externals/zlib"))
- ;; Clean up source.
- (for-each delete-file (find-files "." "\\.bin$"))
- (for-each delete-file (find-files "." "\\.dsy$"))
- (for-each delete-file (find-files "." "\\.exe$"))
- (for-each delete-file (find-files "." "\\.jar$"))
- (for-each delete-file (find-files "." "\\.rar$"))
- #t))
+ (modules '((guix build utils)))
+ (snippet
+ '(begin
+ ;; Remove external stuff we don't need.
+ (for-each (lambda (dir)
+ (delete-file-recursively
+ (string-append "Externals/" dir)))
+ '("LZO" "OpenAL" "Qt" "SFML" "SOIL" "curl" "ffmpeg"
+ "gettext" "hidapi" "libpng" "libusb" "mbedtls"
+ "miniupnpc" "wxWidgets3" "zlib"))
+ ;; Clean up source.
+ (for-each delete-file (find-files "."
".*\\.(bin|dsy|exe|jar|rar)$"))
+ #t))
(sha256
(base32
"0g725wmhlim73zrhi47wmr1bmplpy4b7sbimd5pm8xpfhj5nm10l"))))