Hi, On Wed, 22 Jan 2020 at 05:10, EuAndreh via <help-guix@gnu.org> wrote:
> How can I get in Guix something similar to Nix's emacsWithPackages: > https://nixos.org/nixpkgs/manual/#sec-emacs-config I do not understand what Nix does. Namely, from where do the packages come from? Nix or ELPA? > It shows how to use Nix's packaging capabilities to setup and configure > Emacs, instead of having "use-package" (or similar tools) downloading > and installing packages. The easiest way to achieve similar is to use a manifest file, IMHO. Let consider the file below named '/tmp/my-emacs-config.scm', then it is easy to create a profile (or environment): guix package -m /tmp/my-emacs-config.scm -p /tmp/my-profile and the Emacs living in this very profile should be correctly setup-ed for your needs. Therefore let source the profile or whatever and done. :-) Be careful, a manifest file must return a manifest, so the order matters. However, the file '~/.emacs' is not "protected" and you can add some Scheme code to change it as read-only. Another less straightfoward path is to write our own package definition. But with the current situation -- about partially rewriting on-the-fly the 'arguments' field -- it will be a bit harder. Hope that helps. simon --8<---------------cut here---------------start------------->8--- (use-package-modules emacs emacs-xyz) (with-output-to-file (string-append (getenv "HOME") "/.emacs") (lambda () (display (string-append ";; initialize package \n" " \n" "(require 'package) \n" "(package-initialize 'noactivate) \n" "(eval-when-compile \n" " (require 'use-package)) \n" " \n" ";; load some packages \n" " \n" "(use-package company \n" " :bind (\"<C-tab>\" . company-complete) \n" " :diminish company-mode \n" " :commands (company-mode global-company-mode) \n" " :defer 1 \n" " :config \n" " (global-company-mode)) \n" " \n" "(use-package counsel \n" " :commands (counsel-descbinds) \n" " :bind (([remap execute-extended-command] . counsel-M-x) \n" " (\"C-x C-f\" . counsel-find-file) \n" " (\"C-c g\" . counsel-git) \n" " (\"C-c j\" . counsel-git-grep) \n" " (\"C-c k\" . counsel-ag) \n" " (\"C-x l\" . counsel-locate) \n" " (\"M-y\" . counsel-yank-pop))) \n" " \n" "(use-package flycheck \n" " :defer 2 \n" " :config (global-flycheck-mode)) \n" " \n" "(use-package ivy \n" " :defer 1 \n" " :bind ((\"C-c C-r\" . ivy-resume) \n" " (\"C-x C-b\" . ivy-switch-buffer) \n" " :map ivy-minibuffer-map \n" " (\"C-j\" . ivy-call)) \n" " :diminish ivy-mode \n" " :commands ivy-mode \n" " :config \n" " (ivy-mode 1)) \n" " \n" "(use-package magit \n" " :defer \n" " :if (executable-find \"git\") \n" " :bind ((\"C-x g\" . magit-status) \n" " (\"C-x G\" . magit-dispatch-popup)) \n" " :init \n" " (setq magit-completing-read-function 'ivy-completing-read)) \n" " \n" "(use-package projectile \n" " :commands projectile-mode \n" " :bind-keymap (\"C-c p\" . projectile-command-map) \n" " :defer 5 \n" " :config \n" " (projectile-global-mode)) \n")))) (packages->manifest (list emacs emacs-company emacs-ivy emacs-flycheck emacs-ivy emacs-magit emacs-projectile emacs-use-package)) --8<---------------cut here---------------end--------------->8---
