fix: envvars in profiles.el not being set
This commit is contained in:
parent
df8caf2867
commit
48e3603dfe
1 changed files with 2 additions and 2 deletions
|
@ -105,8 +105,8 @@
|
||||||
(condition-case-unless-debug e
|
(condition-case-unless-debug e
|
||||||
(let ((profile-data (cdr (assq (intern profile) (read (current-buffer))))))
|
(let ((profile-data (cdr (assq (intern profile) (read (current-buffer))))))
|
||||||
(dolist (var profile-data (if profile-data (throw 'found t)))
|
(dolist (var profile-data (if profile-data (throw 'found t)))
|
||||||
(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))))))
|
||||||
;; If the requested profile isn't in profiles.el, then see if
|
;; If the requested profile isn't in profiles.el, then see if
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue