[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: uim: Use emacs-substitute-variables instead of substitute*.
From: |
guix-commits |
Subject: |
02/02: gnu: uim: Use emacs-substitute-variables instead of substitute*. |
Date: |
Fri, 13 Mar 2020 05:07:23 -0400 (EDT) |
arunisaac pushed a commit to branch master
in repository guix.
commit d5b0aa99f8d339b13dbea504bdb9a230e59915a0
Author: Arun Isaac <address@hidden>
AuthorDate: Sat Feb 22 22:06:06 2020 +0530
gnu: uim: Use emacs-substitute-variables instead of substitute*.
* gnu/packages/xorg.scm (uim)[arguments]: In the configure-uim-el phase, use
emacs-substitute-variables instead of substitute*.
---
gnu/packages/xorg.scm | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index a7ba6fe..2bf920b 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -6145,10 +6145,10 @@ X11 servers, Windows, or macOS.")
;; Set path of uim-el-agent and uim-el-helper-agent executables
(add-after 'configure 'configure-uim-el
(lambda* (#:key outputs #:allow-other-keys)
- (substitute* "emacs/uim-var.el"
- (("\"(uim-el-agent|uim-el-helper-agent)\"" _ executable)
- (string-append "\"" (assoc-ref outputs "out")
- "/bin/" executable "\"")))
+ (let ((out (assoc-ref outputs "out")))
+ (emacs-substitute-variables "emacs/uim-var.el"
+ ("uim-el-agent" (string-append out "/bin/uim-el-agent"))
+ ("uim-el-helper-agent" (string-append out
"/bin/uim-el-helper-agent"))))
#t))
;; Fix installation path by renaming share/emacs/uim-el to
;; share/emacs/site-lisp