From 7b9030a45938f0caba0591c4c99e778d45028100 Mon Sep 17 00:00:00 2001 From: John Soo Date: Tue, 16 Jun 2020 23:43:49 -0700 Subject: [PATCH 33/33] gnu: emacs-racer: Patch paths to rust source and racer. * gnu/packages/emacs-xyz.scm (emacs-racer): [arguments] Patch paths to rust source and racer binary in racer.el. --- gnu/packages/emacs-xyz.scm | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index aae9eb25fd..f0a1fddb83 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -168,6 +168,8 @@ #:use-module (gnu packages fontutils) #:use-module (gnu packages password-utils) #:use-module (gnu packages pulseaudio) + #:use-module (gnu packages rust) + #:use-module (gnu packages rust-apps) #:use-module (gnu packages sphinx) #:use-module (gnu packages xdisorg) #:use-module (gnu packages shells) @@ -17375,11 +17377,21 @@ files. It focuses on highlighting the document to improve readability.") #:test-command '("make" "test") #:phases (modify-phases %standard-phases + (add-after 'unpack 'patch-rust-src-path + (lambda* (#:key inputs #:allow-other-keys) + (substitute* "racer.el" + (("/usr/local/src/rust/src") + (string-append (assoc-ref inputs "rust") "/src/src")) + (("/usr/local/bin/racer") + (string-append (assoc-ref inputs "racer") "/bin/racer"))))) (add-before 'check 'fix-makefile (lambda _ (substitute* "Makefile" (("\\$\\{CASK\\} exec ") "")) #t))))) + (inputs + `(("racer" ,racer) + ("rust" ,rust "source"))) (native-inputs `(("emacs-ert-runner" ,emacs-ert-runner) ("emacs-undercover" ,emacs-undercover))) -- 2.26.2