me
/
guix
Archived
1
0
Fork 0
Code

gnu: uim: Do not install elisp files in guix.d. 

* gnu/packages/xorg.scm (uim)[arguments]: Pass %output/share/emacs to the
--with-lispdir configure flag. Add fix-install-path phase after install phase.
master
Arun Isaac 2020-02-22 13:18:17 +05:30
parent d1548cb09f
commit acf6168b5d
No known key found for this signature in database
GPG Key ID: 2E25EE8B61802BB3
1 changed files with 12 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gnu/packages/xorg.scm
View File

@ -13,7 +13,7 @@
;;; Copyright © 2016, 2017 John Darrington <jmd@gnu.org>
;;; Copyright © 2017, 2018, 2019 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2017, 2018, 2019 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2017, 2020 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018 Kei Kebreau <kkebreau@posteo.net>
;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
@ -6137,8 +6137,7 @@ X11 servers, Windows, or macOS.")
(guix build emacs-utils))
#:configure-flags
(list "--with-anthy-utf8"
(string-append "--with-lispdir=" %output
"/share/emacs/site-lisp/guix.d")
(string-append "--with-lispdir=" %output "/share/emacs")
;; Set proper runpath
(string-append "LDFLAGS=-Wl,-rpath=" %output "/lib"))
#:phases
@ -6151,8 +6150,17 @@ X11 servers, Windows, or macOS.")
(string-append "\"" (assoc-ref outputs "out")
"/bin/" executable "\"")))
#t))
;; Fix installation path by renaming share/emacs/uim-el to
;; share/emacs/site-lisp
(add-after 'install 'fix-install-path
(lambda* (#:key outputs #:allow-other-keys)
(let ((share-emacs (string-append (assoc-ref outputs "out")
"/share/emacs")))
(rename-file (string-append share-emacs "/uim-el")
(string-append share-emacs "/site-lisp")))
#t))
;; Generate emacs autoloads for uim.el
(add-after 'install 'make-autoloads
(add-after 'fix-install-path 'make-autoloads
(lambda* (#:key outputs #:allow-other-keys)
(emacs-generate-autoloads
,name (string-append (assoc-ref outputs "out")