diff mbox series

[bug#40293] gnu: cedille: Fix outputs.

Message ID 87wo7444iz.fsf@asu.edu
State Accepted
Headers show
Series [bug#40293] gnu: cedille: Fix outputs. | expand

Checks

Context Check Description
cbaines/applying patch fail View Laminar job

Commit Message

John Soo March 28, 2020, 8:18 p.m. UTC 
Hi Guix,

Cedille's emacs-mode paths needed some slight adjustment.
This also installs the info page I missed when first submitting the
package.

Thanks,

John

Comments

Marius Bakke April 2, 2020, 4:44 p.m. UTC | #1 
John Soo <jsoo1@asu.edu> writes:

> Hi Guix,
>
> Cedille's emacs-mode paths needed some slight adjustment.
> This also installs the info page I missed when first submitting the
> package.

Thanks!  I rewrote the commit message of the second patch to more
accurately convey what the patch does in the GNU ChangeLog style.

Applied!
diff mbox series

Patch

>From 45f8563a1d0a32763b43966b214902571ec7c6cb Mon Sep 17 00:00:00 2001
From: John Soo <jsoo1@asu.edu>
Date: Sat, 28 Mar 2020 10:30:48 -0700
Subject: [PATCH 2/2] gnu: cedille: Install the info pages.

* gnu/packages/cedille.scm (cedille):[arguments] Install the info pages.
---
 gnu/packages/cedille.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/cedille.scm b/gnu/packages/cedille.scm
index 9f6c01ea80..d3dd576323 100644
--- a/gnu/packages/cedille.scm
+++ b/gnu/packages/cedille.scm
@@ -51,15 +51,19 @@ 
     (arguments
      `(#:phases
        (modify-phases %standard-phases
-         (add-after 'unpack 'patch-cedille-path-el
+         (add-after 'unpack 'patch-cedille-paths
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))
                (substitute* "cedille-mode.el"
                  (("/usr/share/emacs/site-lisp/cedille-mode")
                   (string-append
                    out "/share/emacs/site-lisp/cedille")))
+               (substitute* "cedille-mode/cedille-mode-info.el"
+                 (("\\(concat cedille-path-el \"cedille-info-main.info\"\\)")
+                  (string-append
+                   "\"" out "/share/info/cedille-info-main.info.gz\"")))
                #t)))
-         (add-after 'unpack 'copy-cedille-mode
+         (add-after 'patch-cedille-paths 'copy-cedille-mode
            (lambda* (#:key outputs #:allow-other-keys)
              (let* ((out (assoc-ref outputs "out"))
                     (lisp
@@ -107,6 +111,8 @@ 
                (install-file "cedille" (string-append out "/bin"))
                (install-file "core/cedille-core"
                              (string-append out "/bin"))
+               (install-file "docs/info/cedille-info-main.info"
+                             (string-append out "/share/info"))
                #t))))))
     (home-page "https://cedille.github.io/")
     (synopsis
-- 
2.26.0