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))
|
(dolist (mode '(normal insert))
|
||||||
(evil-global-set-key mode (kbd "C-x c g") #'ambrevar/guix-edit-manifest)))
|
(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)
|
(defun ambrevar/guix-find-channel-from-manifest (pattern)
|
||||||
"Return the channel specification file matching PATTERN in
|
"Return the channel specification file matching PATTERN in
|
||||||
`ambrevar/guix-channel-spec-directory'."
|
`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)))
|
"/" manifest-name)))
|
||||||
" ")))
|
" ")))
|
||||||
manifests)
|
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)
|
(defun ambrevar/guix-install-manifest (&optional manifest channel)
|
||||||
"Install Guix manifest to `ambrevar/guix-extra-profiles'.
|
"Install Guix manifest to `ambrevar/guix-extra-profiles'.
|
||||||
|
|
Loading…
Reference in New Issue