From 156094fc3fa192467a9e3cd2a65eb88ff4804f50 Mon Sep 17 00:00:00 2001 From: Zheng Junjie <873216071@qq.com> Date: Wed, 12 Jul 2023 13:42:54 +0800 Subject: [PATCH] gnu: kcontacts: Use G-expressions. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * gnu/packages/kde-frameworks.scm (kcontacts)[arguments]: Rewrite as G-expressions. Signed-off-by: 宋文武 --- gnu/packages/kde-frameworks.scm | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm index 62c7a1d2b5..616f695988 100644 --- a/gnu/packages/kde-frameworks.scm +++ b/gnu/packages/kde-frameworks.scm @@ -1636,15 +1636,16 @@ (define-public kcontacts (list qtbase-5)) (propagated-inputs (list ;; As required by KF5ContactsConfig.cmake. - iso-codes kcodecs kconfig kcoreaddons qtdeclarative-5 ki18n)) + iso-codes kcodecs kconfig kcoreaddons qtdeclarative-5 ki18n)) (arguments - `(#:phases - (modify-phases %standard-phases - (add-before 'check 'check-setup - (lambda _ - (setenv "HOME" (getcwd)) - (system "Xvfb +extension GLX :1 -screen 0 640x480x24 &") - (setenv "DISPLAY" ":1")))))) + (list + #:phases + #~(modify-phases %standard-phases + (add-before 'check 'check-setup + (lambda _ + (setenv "HOME" (getcwd)) + (system "Xvfb +extension GLX :1 -screen 0 640x480x24 &") + (setenv "DISPLAY" ":1")))))) (home-page "https://community.kde.org/Frameworks") (synopsis "API for contacts/address book data following the vCard standard") (description "This library provides a vCard data model, vCard