From 51ec304fb7668723bddbb0e740ff18d1a103c95e Mon Sep 17 00:00:00 2001 From: Nicolas Graves Date: Sun, 12 Apr 2026 02:37:31 +0200 Subject: gnu: ganv: Improve style. * gnu/packages/gtk.scm (ganv): Run guix style. [arguments]<#:tests>: Relocate keyword. <#:phases>: Improve style. [inputs]: Drop input labels, drop input labels. Change-Id: If6d24a7bcc89ce5b5322df8bd6494552db193a65 Signed-off-by: Andreas Enge --- gnu/packages/gtk.scm | 23 ++++++++++------------- 1 file changed, 10 insertions(+), 13 deletions(-) (limited to 'gnu') diff --git a/gnu/packages/gtk.scm b/gnu/packages/gtk.scm index 3261480265..0650df876c 100644 --- a/gnu/packages/gtk.scm +++ b/gnu/packages/gtk.scm @@ -517,22 +517,19 @@ functions which were removed.") "0pik2d3995z0rjcjhb4hsj5fsph3m8khg6j10k6mx4j2j727aq6l")))) (build-system waf-build-system) (arguments - `(#:phases - (modify-phases %standard-phases - (add-before 'configure 'set-flags - (lambda* (#:key outputs #:allow-other-keys) - ;; Allow 'bin/ganv_bench' to find libganv-1.so. - (setenv "LDFLAGS" - (string-append "-Wl,-rpath=" - (assoc-ref outputs "out") "/lib")) - #t))) - #:tests? #f)) ; no check target - (inputs - `(("gtk" ,gtk+-2) - ("gtkmm" ,gtkmm-2))) + (list + #:tests? #f ; no check target + #:phases + #~(modify-phases %standard-phases + (add-before 'configure 'set-flags + (lambda _ + ;; Allow 'bin/ganv_bench' to find libganv-1.so. + (setenv "LDFLAGS" + (string-append "-Wl,-rpath=" #$output "/lib"))))))) (native-inputs (list `(,glib "bin") ; for glib-genmarshal, etc. pkg-config)) + (inputs (list gtk+-2 gtkmm-2)) (home-page "https://drobilla.net/software/ganv/") (synopsis "GTK+ widget for interactive graph-like environments") (description -- cgit v1.3