ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-12 06:06:53 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs-build-system: Fix 'package-name-version->elpa-name-version'.

Browse source 
Fixes a regression introduced in b7c7c03eb5.

* guix/build/emacs-build-system.scm (package-name-version->elpa-name-version):
  Remove unused 'name' binding.  Do not abuse 'strip-store-file-name' to
  remove the "emacs-" prefix, which worked before b7c7c03eb5 but not after.
This commit is contained in:
Mark H Weaver 2015-09-23 17:34:54 -04:00
parent bd90127ad4
commit a05c06720a
1 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
guix/build/emacs-build-system.scm
View file

@ -138,10 +138,9 @@ (define (emacs-inputs-el-directories dirs)
(define (package-name-version->elpa-name-version name-ver)
"Convert the Guix package NAME-VER to the corresponding ELPA name-version
format. Essnetially drop the prefix used in Guix."
(let ((name (strip-store-file-name name-ver)))
(if (emacs-package? name-ver)
(strip-store-file-name name-ver)
name-ver)))
(if (emacs-package? name-ver) ; checks for "emacs-" prefix
(string-drop name-ver (string-length "emacs-"))
name-ver))
(define (store-directory->elpa-name-version store-dir)
"Given a store directory STORE-DIR return the part of the basename after the