Emacs/Guix: Don't dump channel specs anymore.
Guix can now generate them from an existing profile.master
parent
f859612295
commit
ff05a492f4
|
@ -145,12 +145,6 @@ If MANIFEST is nil, it is queried from the manifests found in `ambrevar/guix-man
|
|||
(dolist (mode '(normal insert))
|
||||
(evil-global-set-key mode (kbd "C-x c g") #'ambrevar/guix-edit-manifest)))
|
||||
|
||||
(defun ambrevar/guix-save-channel-specs (dest)
|
||||
"Save current Guix channel specification to DEST."
|
||||
(call-process "guix"
|
||||
nil `(:file ,dest) nil
|
||||
"describe" "--format=channels"))
|
||||
|
||||
(defun ambrevar/guix-find-channel-from-manifest (pattern)
|
||||
"Return the channel specification file matching PATTERN in
|
||||
`ambrevar/guix-channel-spec-directory'."
|
||||
|
@ -219,15 +213,7 @@ If MANIFEST is nil, it is queried from the manifests found in `ambrevar/guix-man
|
|||
"/" manifest-name)))
|
||||
" ")))
|
||||
manifests)
|
||||
" ; "))
|
||||
(unless channel
|
||||
;; TODO: Only do this when manifest install has succeeded.
|
||||
(dolist (manifest-pair manifests)
|
||||
(let ((manifest-name (cl-first manifest-pair)))
|
||||
(ambrevar/guix-save-channel-specs
|
||||
(format "%s/guix-%s-channels.scm"
|
||||
ambrevar/guix-channel-spec-directory
|
||||
manifest-name)))))))
|
||||
" ; "))))
|
||||
|
||||
(defun ambrevar/guix-install-manifest (&optional manifest channel)
|
||||
"Install Guix manifest to `ambrevar/guix-extra-profiles'.
|
||||
|
|
Loading…
Reference in New Issue