From mboxrd@z Thu Jan 1 00:00:00 1970 From: ng0 Subject: [PATCH 2/2] gnu: kbd: Add neo layout. Date: Sun, 1 Jan 2017 17:22:25 +0000 Message-ID: <20170101172225.3408-3-ng0@libertad.pw> References: <20170101172225.3408-1-ng0@libertad.pw> Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:40805) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cNjph-0005em-AN for guix-devel@gnu.org; Sun, 01 Jan 2017 12:22:10 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cNjpg-0003Cw-CZ for guix-devel@gnu.org; Sun, 01 Jan 2017 12:22:09 -0500 Received: from aibo.runbox.com ([91.220.196.211]:41889) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1cNjpg-0003C8-5k for guix-devel@gnu.org; Sun, 01 Jan 2017 12:22:08 -0500 Received: from [10.9.9.211] (helo=mailfront11.runbox.com) by bars.runbox.com with esmtp (Exim 4.71) (envelope-from ) id 1cNjpf-0002Eg-0i for guix-devel@gnu.org; Sun, 01 Jan 2017 18:22:07 +0100 In-Reply-To: <20170101172225.3408-1-ng0@libertad.pw> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: "Guix-devel" To: guix-devel@gnu.org * gnu/packages/linux.scm (kbd): Add neo layout. [arguments]: Add new 'install-neo-layout' phase. --- gnu/packages/linux.scm | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 196ae8c49..231ba5765 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -1640,10 +1640,19 @@ system.") (for-each (lambda (prog) (wrap-program (string-append bin "/" prog) `("PATH" ":" prefix (,bin)))) - '("unicode_start" "unicode_stop")))))))) + '("unicode_start" "unicode_stop"))))) + (add-after 'build 'install-neo-layout + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((neo (assoc-ref inputs "kbd-neo")) + (out (assoc-ref outputs "out")) + (neomap (string-append neo "/console/neo.map")) + (keymaps (string-append out "/share/keymaps/i386/neo"))) + (mkdir-p keymaps) + (install-file neomap keymaps))))))) (inputs `(("check" ,check) ("gzip" ,gzip) ("bzip2" ,bzip2) + ("kbd-neo" ,kbd-neo) ("pam" ,linux-pam))) (native-inputs `(("pkg-config" ,pkg-config))) (home-page "ftp://ftp.kernel.org/pub/linux/utils/kbd/") -- 2.11.0