Subject: bug#26802: closed (Re: bug#26802: [PATCH 4/4] build: emacs: Fix `store-file->elisp-source-file'.)

From: [email-masked] (GNU bug Tracking System)
Date: Mon, 22 May 2017 23:12:02 +0000

Your bug report

#26802: Single source file emacs packages get a ".el.el" extension

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
26802: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=26802
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#26802: [PATCH 4/4] build: emacs: Fix `store-file->elisp-source-file'.
From: Arun Isaac <[email-masked]>
To: [email-masked]
Cc: Alex Kost <[email-masked]>, Ludovic Courtès <[email-masked]>
Date: Tue, 23 May 2017 04:40:44 +0530
List-Id: <debbugs-submit.debbugs.gnu.org>

> Pro tip: (string-drop-right …) can be replaced by:
>
>   (basename file ".el")

Thanks! Made this modification...

Pushed patches 1, 2 and 4.

Subject: Single source file emacs packages get a ".el.el" extension
From: Arun Isaac <[email-masked]>
To: [email-masked]
Date: Sat, 06 May 2017 18:21:56 +0530
List-Id: <debbugs-submit.debbugs.gnu.org>

Single source file emacs packages (such as emacs-goto-chg,
emacs-transpose-frame, emacs-key-chord, etc.) get installed with a
double extension (".el.el"). This patch fixes that.

>From 4796890f507a126edb6020573547d37815b3241e Mon Sep 17 00:00:00 2001
From: Arun Isaac <[email-masked]>
Date: Sat, 6 May 2017 18:16:36 +0530
Subject: [PATCH] build: emacs: Don't append an extra ".el" to source file
 name.

* guix/build/emacs-build-system.scm (store-file->elisp-source-file): The
  source file name already has a ".el" suffix. Don't append an extra ".el".
---
 guix/build/emacs-build-system.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/guix/build/emacs-build-system.scm b/guix/build/emacs-build-system.scm
index 44e8b0d31..3669b7d59 100644
--- a/guix/build/emacs-build-system.scm
+++ b/guix/build/emacs-build-system.scm
@@ -2,6 +2,7 @@
 ;;; Copyright © 2015 Federico Beffa <[email-masked]>
 ;;; Copyright © 2016 David Thompson <[email-masked]>
 ;;; Copyright © 2016 Alex Kost <[email-masked]>
+;;; Copyright © 2017 Arun Isaac <[email-masked]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -50,7 +51,7 @@ name that has been stripped of the hash and version number."
   (let-values (((name version)
                 (package-name->name+version
                  (strip-store-file-name file))))
-    (string-append name ".el")))
+    name))
 
 (define* (unpack #:key source #:allow-other-keys)
   "Unpack SOURCE into the build directory.  SOURCE may be a compressed
-- 
2.12.2