~ruther/guix-local

e613e45274c409ca72abbb712c0527f675608234 — Janneke Nieuwenhuizen 1 year, 11 months ago d131155
gnu: guile-for-guile-emacs: Update to wip-elisp-rebased.

* gnu/packages/guile.scm (guile-for-guile-emacs): Inherit from guile-next.
Update to 4b9b8277733729f5b825f78fadfead9fc3630e7e.
[version]: Update to 3.0.7-81.
[arguments, native-inputs]: Remove.

Change-Id: I78a53c2b45c4d2b87f560da82b400cbd985e332a
1 files changed, 5 insertions(+), 30 deletions(-)

M gnu/packages/guile.scm
M gnu/packages/guile.scm => gnu/packages/guile.scm +5 -30
@@ 615,11 615,11 @@ GNU@tie{}Guile.  Use the @code{(ice-9 readline)} module and call its
                           #:deep? #f))

(define-public guile-for-guile-emacs
  (let ((commit "15ca78482ac0dd2e3eb36dcb31765d8652d7106d")
        (revision "1"))
    (package (inherit guile-2.2)
  (let ((commit "4b9b8277733729f5b825f78fadfead9fc3630e7e")
        (revision "0"))
    (package (inherit guile-next)
      (name "guile-for-guile-emacs")
      (version (git-version "2.1.2" revision commit))
      (version (git-version "3.0.7-81" revision commit))
      (source (origin
                (method git-fetch)
                (uri (git-reference


@@ 628,32 628,7 @@ GNU@tie{}Guile.  Use the @code{(ice-9 readline)} module and call its
                (file-name (git-file-name name version))
                (sha256
                 (base32
                  "1l7ik4q4zk7vq4m3gnwizc0b64b1mdr31hxqlzxs94xaf2lvi7s2"))))
      (arguments
       (substitute-keyword-arguments (package-arguments guile-2.2)
         ((#:phases phases)
          #~(modify-phases #$phases
             (replace 'bootstrap
               (lambda _
                 ;; Disable broken tests.
                 ;; TODO: Fix them!
                 (substitute* "test-suite/tests/gc.test"
                   (("\\(pass-if \"after-gc-hook gets called\"" m)
                    (string-append "#;" m)))
                 (substitute* "test-suite/tests/version.test"
                   (("\\(pass-if \"version reporting works\"" m)
                    (string-append "#;" m)))

                 (patch-shebang "build-aux/git-version-gen")
                 (invoke "sh" "autogen.sh")))))))
      (native-inputs
       (modify-inputs (package-native-inputs guile-2.2)
         (prepend autoconf
                  automake
                  libtool
                  flex
                  texinfo
                  gettext-minimal))))))
                  "0fgkcv29581kqkxqq6y48xly72970qs7016qhs6c4ilygg0gyfqb")))))))


;;;