>From 8011d1c62b49c309ddba933d27fc4c86eabf60a2 Mon Sep 17 00:00:00 2001 From: Alex Kost
Date: Fri, 24 Jul 2015 20:31:11 +0300 Subject: [PATCH 2/2] emacs: Add 'guix-devel-build-package-definition'. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Suggested by Ludovic Courtès . * emacs/guix-guile.el (guix-guile-definition-regexp): New variable. (guix-guile-current-definition, guix-guile-boolean): New functions. * emacs/guix-devel.el: Require 'guix-base'. (guix-devel-repl-processes): New variable. (guix-devel-setup-repl, guix-devel-setup-repl-maybe): New functions. (guix-devel-build-package-definition): New command. * doc/emacs.texi (Emacs Development): Document it. --- doc/emacs.texi | 24 ++++++++++++++++++++++++ emacs/guix-devel.el | 40 ++++++++++++++++++++++++++++++++++++++++ emacs/guix-guile.el | 22 ++++++++++++++++++++++ 3 files changed, 86 insertions(+) diff --git a/doc/emacs.texi b/doc/emacs.texi index d44d329..b6f2701 100644 --- a/doc/emacs.texi +++ b/doc/emacs.texi @@ -659,4 +659,28 @@ want to use a module it defines, so you switch to the Geiser REPL and write @code{,use (some module)} there. You may just use this command instead (@code{guix-devel-use-module}). address@hidden C-c . b +Build a package defined by the current variable definition. The +building process is run in the current Geiser REPL. If you modified the +current package definition, don't forget to reevaluate it before calling +this command---for example, with @kbd{C-M-x} (@pxref{To eval or not to +eval,,, geiser, Geiser User Manual}) +(@code{guix-devel-build-package-definition}). + @end table + +Unluckily, there is a limitation related to long-running REPL commands. +When there is a running process in a Geiser REPL, you are not supposed +to evaluate anything in a scheme buffer, because this will ``freeze'' +the REPL: it will stop producing any output (however, the evaluating +process will continue---you will just not see any progress anymore). Be +aware: even moving the point in a scheme buffer may ``break'' the REPL +if Autodoc (@pxref{Autodoc and friends,,, geiser, Geiser User Manual}) +is enabled (which is the default). + +So you have to postpone editing your scheme buffers until the running +evaluation will be finished in the REPL. + +Alternatively, to avoid this limitation, you may just run another Geiser +REPL, and while something is being evaluated in the previous REPL, you +can continue editing a scheme file with the help of the current one. diff --git a/emacs/guix-devel.el b/emacs/guix-devel.el index ed82e33..6de49be 100644 --- a/emacs/guix-devel.el +++ b/emacs/guix-devel.el @@ -27,6 +27,7 @@ (require 'guix-guile) (require 'guix-geiser) (require 'guix-utils) +(require 'guix-base) (defgroup guix-devel nil "Settings for Guix development utils." @@ -55,8 +56,47 @@ Interactively, use the module defined by the current scheme file." (interactive) (guix-copy-as-kill (guix-guile-current-module))) +(defun guix-devel-setup-repl (&optional repl) + "Setup REPL for using `guix-devel-...' commands." + (guix-devel-use-modules "(guix monad-repl)" + "(guix scripts)" + "(guix store)") + ;; Without this workaround, the build output disappears. See + ;;