225/285: gnu: emacs-doom-themes: Only disable breaking compilations.

[guix-commits]

kkebreau pushed a commit to branch wip-gnome3.34
in repository guix.

commit a86b053a1f0ad39446b0faed81f4f5a0b150a133
Author: Leo Prikler <address@hidden>
Date:   Sun Dec 15 00:49:26 2019 +0100

    gnu: emacs-doom-themes: Only disable breaking compilations.
    
    * gnu/packages/emacs-xyz.scm (emacs-doom-themes)[phases]:
    <build>: Readd this phase.
    <disable-breaking-compilation>: Add this phase to work around single file
    errors in bytecompilation.
    
    Signed-off-by: Brett Gilio <address@hidden>
---
 gnu/packages/emacs-xyz.scm | 23 ++++++++++++++++++-----
 1 file changed, 18 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 03f8186..5c66cfe 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -19827,6 +19827,10 @@ contrast and few colors.")
       (arguments
        `(#:tests? #t
          #:test-command '("ert-runner")
+         #:modules ((guix build emacs-build-system)
+                    (guix build utils)
+                    (guix build emacs-utils)
+                    (srfi srfi-1))
          #:phases
          (modify-phases %standard-phases
            (add-after 'unpack 'move-themes
@@ -19837,12 +19841,21 @@ contrast and few colors.")
                            (rename-file f (basename f)))
                          (find-files "./themes" ".*\\.el$"))
                #t))
-           ;; XXX: There is a byte-code overflow issue in the latest
-           ;; checkout which affects byte-compilation for several theme
-           ;; files. The easiest way to work around this is to disable
-           ;; byte-compilation until the issue is resolved.
+           ;; There is a byte-code overflow issue in the latest checkout
+           ;; which affects byte-compilation for several (read `most') theme
+           ;; files. In order to cope with this issue, we disable
+           ;; byte-compilation until this issue is resolved.
            ;; <https://github.com/hlissner/emacs-doom-themes/issues/314>
-           (delete 'build))))
+           (add-after 'move-themes 'disable-breaking-compilation
+             (lambda _
+               (for-each (lambda (file)
+                           (chmod file #o600) ; needed to write changes.
+                           (emacs-batch-disable-compilation file))
+                         (cons "doom-themes-ext-neotree.el"
+                               (lset-difference string-contains
+                                                (find-files "." ".*-theme.el")
+                                                '("snazzy" "tomorrow-day"))))
+               #t)))))
       (synopsis "Wide collection of color themes for Emacs")
       (description "Emacs-doom-themes contains numerous popular color themes 
for
 Emacs that integrate with major modes like Org-mode.")