[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: an xwidget-emacs rpm
From: |
joakim |
Subject: |
Re: an xwidget-emacs rpm |
Date: |
Thu, 07 May 2015 11:09:54 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/25.0.50 (gnu/linux) |
Ricardo Wurmus <address@hidden> writes:
> Andreas Röhler writes:
>
>> being slightly bewildered by the rpm-format. As used to either doing
>> make or rmp...
>> BTW is there a way to compile it from source?
>
> Attached is a recipe for GNU Guix to compile Emacs from source. (It
> inherits from the Emacs package definition in Guix.) You can just drop
> this file somewhere (for example in ~/my-packages) and then run
>
> GUIX_PACKAGE_PATH=~/my-packages/ guix build emacs-xwidget
>
> It will fetch commit 0cfb6600a837f67997aef027f0183aca9df05df9 from the
> git repository on savannah, run autogen.sh and build Emacs with the
> xwidget feature.
This seems very cool!
I'm not familiar at all with Guix though.
Seems like a good opportunity to learn it!
>
> ~~ Ricardo
>
> (define-module (emacs-xwidget)
> #:use-module ((guix licenses) #:prefix license:)
> #:use-module (guix packages)
> #:use-module (guix download)
> #:use-module (guix git-download)
> #:use-module (guix build-system gnu)
> #:use-module (gnu packages)
> #:use-module (gnu packages emacs)
> #:use-module (gnu packages autotools)
> #:use-module (guix utils)
> #:use-module (srfi srfi-1))
>
> (define-public emacs-xwidget
> (let ((commit "0cfb6600a837f67997aef027f0183aca9df05df9"))
> (package (inherit emacs)
> (name "emacs-xwidget")
> (source (origin
> (method git-fetch)
> (uri (git-reference
> (url "http://git.savannah.gnu.org/r/emacs.git")
> (commit commit)))
> (sha256
> (base32
> "1b6gacwg16836g3hy5mqlpg1fxx8idvss0xhlwvskj6rf0lxyqji"))
> (file-name (string-append name "-checkout-" commit))
> (patches (list (search-patch "emacs-exec-path.patch")))))
> (synopsis "The extensible, customizable, self-documenting text
> editor (with xwidget support)" )
> (native-inputs
> `(("autoconf" ,autoconf)
> ("automake" ,automake)
> ,@(package-native-inputs emacs)))
> (arguments
> (substitute-keyword-arguments (package-arguments emacs)
> ((#:configure-flags flags)
> `(append '("--with-xwidgets"
> "--with-x-toolkit=gtk3")
> ,flags))
> ((#:phases phases)
> `(modify-phases ,phases
> (add-before
> 'configure 'autogen
> (lambda _ (zero? (system* "bash" "autogen.sh")))))))))))
>
--
Joakim Verona