diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-10-30 02:00:05 +0100 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2022-10-30 02:00:19 +0100 |
| commit | 168b946acd7660e4bc9f647f39be8d5455a19fe2 (patch) | |
| tree | 34f4558e644c77d95da50dbfc9a498356a54eed1 /gnu | |
| parent | 75b538daf46a8c983c9193166d86e7e8ea84b69d (diff) | |
| download | guix-168b946acd7660e4bc9f647f39be8d5455a19fe2.tar guix-168b946acd7660e4bc9f647f39be8d5455a19fe2.tar.gz | |
gnu: steghide: Update package style.
* gnu/packages/image.scm (steghide)[arguments]:
Rewrite as G-expressions. Don't explicitly return #t from phases.
[native-inputs, inputs]: Remove input labels.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/packages/image.scm | 31 |
1 files changed, 13 insertions, 18 deletions
diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm index 557a89aa6b..cfd65c8bfa 100644 --- a/gnu/packages/image.scm +++ b/gnu/packages/image.scm @@ -1519,26 +1519,21 @@ differences in file encoding, image quality, and other small variations.") "18bxlhbdc3zsmxj84i417xjh0q28kv26q449k23n0a72ldwziix2")) (patches (list (search-patch "steghide-fixes.patch"))))) (build-system gnu-build-system) + (arguments + (list #:make-flags + #~(list "CXXFLAGS=-fpermissive") ; required for MHashPP.cc + #:phases + #~(modify-phases %standard-phases + (add-before 'configure 'set-perl-search-path + (lambda _ + ;; Work around "dotless @INC" build failure. + (setenv "PERL5LIB" + (string-append (getcwd) "/tests:" + (getenv "PERL5LIB")))))))) (native-inputs - `(("gettext" ,gettext-minimal) - ("libtool" ,libtool) - ("perl" ,perl))) ;for tests + (list gettext-minimal libtool perl)) (inputs - `(("libmhash" ,libmhash) - ("libmcrypt" ,libmcrypt) - ("libjpeg" ,libjpeg-turbo) - ("zlib" ,zlib))) - (arguments - `(#:make-flags '("CXXFLAGS=-fpermissive") ;required for MHashPP.cc - - #:phases (modify-phases %standard-phases - (add-before 'configure 'set-perl-search-path - (lambda _ - ;; Work around "dotless @INC" build failure. - (setenv "PERL5LIB" - (string-append (getcwd) "/tests:" - (getenv "PERL5LIB"))) - #t))))) + (list libjpeg-turbo libmhash libmcrypt zlib)) (home-page "http://steghide.sourceforge.net") (synopsis "Image and audio steganography") (description |