From: Alex Kost <alezost@gmail.com>
To: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Cc: guix-devel@gnu.org
Subject: Re: [PATCH] gnu: asymptote: Install Emacs data
Date: Sat, 07 May 2016 11:15:18 +0300 [thread overview]
Message-ID: <87posy7089.fsf@gmail.com> (raw)
In-Reply-To: <87inyqbvf2.fsf@saiph.selenimh> (Nicolas Goaziou's message of "Sat, 07 May 2016 01:48:01 +0200")
Nicolas Goaziou (2016-05-07 02:48 +0300) wrote:
> Hello,
>
> The following patch installs Emacs libraries provided by Asymptote in
> a location where they can be found.
Thanks! Sorry I didn't build asymptote (as I don't have a wish to build
gigabytes of texlive), but I looked at the source and I see there are
"autoloads" cookies in "<asymptote>/base/asy-mode.el", so it would also
be good to generate "asymptote-autoloads.el" file.
This file will be automatically loaded by emacs, and a user will not
have to do any additional settings in ".emacs", as ".asy" files will be
opened in "asy-mode" automatically.
For example, you may look at (gnu packages emacs) module to see how
"autoloads" file are generated using 'emacs-generate-autoloads'
procedure. I write some notes below, that seems appropriate to me, but
I'm not going to test the patch because of texlive (sorry again). I
hope other people will do.
> From 5ebefd0edc14c4b0dc0db6dec200cc117c625848 Mon Sep 17 00:00:00 2001
> From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
> Date: Wed, 4 May 2016 00:43:36 +0200
> Subject: [PATCH] gnu: asymptote: Install Emacs data
>
> * gnu/packages/plotutils.scm (asymptote)[arguments]: Add a phase to
> install Emacs-Lisp files in an appropriate place.
> ---
> gnu/packages/plotutils.scm | 16 +++++++++++++---
> 1 file changed, 13 insertions(+), 3 deletions(-)
>
> diff --git a/gnu/packages/plotutils.scm b/gnu/packages/plotutils.scm
> index 3fdd539..027fdc1 100644
> --- a/gnu/packages/plotutils.scm
> +++ b/gnu/packages/plotutils.scm
> @@ -198,7 +198,10 @@ colors, styles, options and details.")
> ("readline" ,readline)
> ("zlib" ,zlib)))
> (arguments
> - `(#:configure-flags
> + `(#:modules ((guix build gnu-build-system)
> + (guix build utils)
> + (srfi srfi-26))
You will need to add (guix build emacs-utils) module here, and:
#:imported-modules (,@%gnu-build-system-modules
(guix build emacs-utils))
> + #:configure-flags
> (list (string-append "--enable-gc=" (assoc-ref %build-inputs "libgc"))
> (string-append "--with-latex="
> (assoc-ref %outputs "out")
> @@ -210,7 +213,7 @@ colors, styles, options and details.")
> (modify-phases %standard-phases
> (add-before 'build 'patch-pdf-viewer
> (lambda _
> - ;; Default to a free pdf viewer
> + ;; Default to a free pdf viewer.
> (substitute* "settings.cc"
> (("defaultPDFViewer=\"acroread\"")
> "defaultPDFViewer=\"gv\""))))
> @@ -218,7 +221,14 @@ colors, styles, options and details.")
> ;; Some tests require write access to $HOME, otherwise leading to
> ;; "failed to create directory /homeless-shelter/.asy" error.
> (lambda _
> - (setenv "HOME" "/tmp"))))))
> + (setenv "HOME" "/tmp")))
> + (add-after 'install 'install-emacs-data
> + (lambda* (#:key outputs #:allow-other-keys)
> + ;; Install related Emacs libraries in an appropriate location.
> + (for-each (cute install-file <>
> + (string-append (assoc-ref outputs "out")
> + "/share/emacs/site-lisp"))
> + (find-files "." "\\.el$")))))))
Overall this phase would look like this (not tested):
(add-after 'install 'install-emacs-data
(lambda* (#:key outputs #:allow-other-keys)
;; Install related Emacs libraries in an appropriate location.
(let* ((out (assoc-ref outputs "out"))
(lisp-dir (string-append out "/share/emacs/site-lisp")))
(for-each (cut install-file <> lisp-dir)
(find-files "." "\\.el$"))
(emacs-generate-autoloads ,name lisp-dir))
#t))
Note that I added #t to the end of the phase because if a phase succeeds
it should return "not false" value. I think it's ok to add #t to the
other phases in this patch.
> (home-page "http://asymptote.sourceforge.net")
> (synopsis "Script-based vector graphics language")
> (description
--
Alex
next prev parent reply other threads:[~2016-05-07 8:15 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2016-05-06 23:48 [PATCH] gnu: asymptote: Install Emacs data Nicolas Goaziou
2016-05-07 8:15 ` Alex Kost [this message]
2016-05-07 12:50 ` Nicolas Goaziou
2016-05-08 8:58 ` Alex Kost
2016-05-08 9:10 ` Nicolas Goaziou
2016-05-12 10:02 ` Alex Kost
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87posy7089.fsf@gmail.com \
--to=alezost@gmail.com \
--cc=guix-devel@gnu.org \
--cc=mail@nicolasgoaziou.fr \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/guix.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.