[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/11: gnu: Add xfontsel.
From: |
Alex Kost |
Subject: |
01/11: gnu: Add xfontsel. |
Date: |
Mon, 25 Jul 2016 14:22:21 +0000 (UTC) |
alezost pushed a commit to branch master
in repository guix.
commit f225ae75443d6f9e5741f26f953bbf832d341135
Author: Alex Kost <address@hidden>
Date: Thu Jun 30 18:44:09 2016 +0300
gnu: Add xfontsel.
* gnu/packages/xorg.scm (xfontsel): New variable.
---
gnu/packages/xorg.scm | 46 ++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 46 insertions(+)
diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index d196568..bc6692d 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -8,6 +8,7 @@
;;; Copyright © 2015 Cyrill Schenkel <address@hidden>
;;; Copyright © 2016 Efraim Flashner <address@hidden>
;;; Copyright © 2016 ng0 <address@hidden>
+;;; Copyright © 2016 Alex Kost <address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -3870,6 +3871,51 @@ running on X server.")
protocol.")
(license license:x11)))
+(define-public xfontsel
+ (package
+ (name "xfontsel")
+ (version "1.0.5")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append
+ "mirror://xorg/individual/app/xfontsel-"
+ version ".tar.bz2"))
+ (sha256
+ (base32
+ "1grir464hy52a71r3mpm9mzvkf7nwr3vk0b1vc27pd3gp588a38p"))))
+ (build-system gnu-build-system)
+ (arguments
+ ;; By default, it tries to install XFontSel file in
+ ;; "/gnu/store/<libxt>/share/X11/app-defaults": it defines this
+ ;; directory from 'libxt' (using 'pkg-config'). To put this file
+ ;; inside output dir and to use it properly, we need to configure
+ ;; --with-appdefaultdir and to wrap 'xfontsel' binary.
+ (let ((app-defaults-dir "/share/X11/app-defaults"))
+ `(#:configure-flags
+ (list (string-append "--with-appdefaultdir="
+ %output ,app-defaults-dir))
+ #:phases
+ (modify-phases %standard-phases
+ (add-after 'install 'wrap-xfontsel
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (wrap-program (string-append out "/bin/xfontsel")
+ `("XAPPLRESDIR" =
+ (,(string-append out ,app-defaults-dir)))))))))))
+ (inputs
+ `(("libx11" ,libx11)
+ ("libxaw" ,libxaw)
+ ("libxmu" ,libxmu)
+ ("libxt" ,libxt)))
+ (native-inputs
+ `(("pkg-config" ,pkg-config)))
+ (home-page "https://www.x.org/wiki/")
+ (synopsis "Browse and select X font names")
+ (description
+ "XFontSel provides a simple way to display the X11 core protocol fonts
+known to your X server, examine samples of each, and retrieve the X Logical
+Font Description (XLFD) full name for a font.")
+ (license license:x11)))
(define-public xmodmap
(package
- branch master updated (1925a87 -> 424a323), Alex Kost, 2016/07/25
- 05/11: doc: Describe how to make X server find TrueType fonts., Alex Kost, 2016/07/25
- 01/11: gnu: Add xfontsel.,
Alex Kost <=
- 09/11: gnu: emacs: Install site-start.el in non-versioned directory., Alex Kost, 2016/07/25
- 03/11: gnu: mkfontdir: Do not propagate 'mkfontscale'., Alex Kost, 2016/07/25
- 04/11: profiles: Add fonts-dir-file hook., Alex Kost, 2016/07/25
- 06/11: gnu: Add xdpyprobe., Alex Kost, 2016/07/25
- 02/11: gnu: Add xfd., Alex Kost, 2016/07/25
- 08/11: gnu: Add guile-daemon., Alex Kost, 2016/07/25
- 10/11: gnu: emacs-solarized-theme: Remove unneeded dependencies., Alex Kost, 2016/07/25
- 11/11: doc: Explain when guix edit is read-only., Alex Kost, 2016/07/25
- 07/11: gnu: Add guile-xosd., Alex Kost, 2016/07/25