fix(cli): env setter for profile loader

Amend: 48e3603dfe
This commit is contained in:
Henrik Lissner
2022-07-28 18:11:04 +02:00
parent 743b740e79
commit 12b52909e3

View File

@ -51,8 +51,8 @@
(condition-case e (condition-case e
(dolist (var (or (cdr (assq (intern profile) (read (current-buffer)))) (dolist (var (or (cdr (assq (intern profile) (read (current-buffer))))
(user-error "No %S profile found" profile))) (user-error "No %S profile found" profile)))
(if (eq var 'env) (if (eq (car var) 'env)
(dolist (env var) (setenv (car env) (cdr env))) (dolist (env (cdr var)) (setenv (car env) (cdr env)))
(set (car var) (cdr var)))) (set (car var) (cdr var))))
(error (error "Failed to parse profiles.el: %s" (error-message-string e))))))) (error (error "Failed to parse profiles.el: %s" (error-message-string e)))))))