01/01: gnu: emacs-polymode: Fix byte compilation.

[Arun Isaac]

arunisaac pushed a commit to branch master
in repository guix.

commit 74b4d7a142193ea6006268139c79a1e68f0e9fb1
Author: Maxim Cournoyer <address@hidden>
Date:   Mon Mar 19 21:55:27 2018 -0400

    gnu: emacs-polymode: Fix byte compilation.
    
    * gnu/packages/emacs.scm (emacs-polymode)[arguments]: Add modes subdirectory
    to #:include. Add add-modes-subdir-to-load-path phase.
    
    Signed-off-by: Arun Isaac <address@hidden>
---
 gnu/packages/emacs.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm
index def4ab1..fa05b98 100644
--- a/gnu/packages/emacs.scm
+++ b/gnu/packages/emacs.scm
@@ -7041,6 +7041,15 @@ contexts.
                  (base32
                   "057cybkq3cy07n5s332k071sjiky3mziy003lza4rh75mgqkwhmh"))))
       (build-system emacs-build-system)
+      (arguments
+       `(#:include (cons* "^modes/.*\\.el$" %default-include)
+         #:phases
+         (modify-phases %standard-phases
+           (add-after 'set-emacs-load-path 'add-modes-subdir-to-load-path
+             (lambda _
+               (setenv "EMACSLOADPATH"
+                       (string-append (getenv "EMACSLOADPATH")
+                                      ":" (getcwd) "/modes" ":")))))))
       (home-page "https://github.com/vspinu/polymode";)
       (synopsis "Framework for multiple Emacs modes based on indirect buffers")
       (description "Polymode is an Emacs package that offers generic support