unofficial mirror of guix-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: ng0 <ng0@libertad.pw>
To: guix-devel@gnu.org
Subject: [PATCH 2/2] gnu: kbd: Add neo layout.
Date: Sun,  1 Jan 2017 17:22:25 +0000	[thread overview]
Message-ID: <20170101172225.3408-3-ng0@libertad.pw> (raw)
In-Reply-To: <20170101172225.3408-1-ng0@libertad.pw>

* 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

  parent reply	other threads:[~2017-01-01 17:22 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2017-01-01 17:22 Add neo-layout to kbd ng0
2017-01-01 17:22 ` [PATCH 1/2] gnu: Add kbd-neo ng0
2017-01-01 19:25   ` Hartmut Goebel
2017-01-01 17:22 ` ng0 [this message]
2017-01-01 19:15   ` [PATCH 2/2] gnu: kbd: Add neo layout Hartmut Goebel
2017-01-01 17:25 ` Add neo-layout to kbd ng0
2017-01-01 19:34   ` Hartmut Goebel
2017-01-22  1:53     ` ng0
2017-01-22 10:36       ` ng0

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://guix.gnu.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20170101172225.3408-3-ng0@libertad.pw \
    --to=ng0@libertad.pw \
    --cc=guix-devel@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).