Sebagai solusinya, berikut ini dapat digunakan (Linux, Bash):
- Jalankan pertama
printenv -0 > env.txt
dari jendela terminal Bash,
- Kemudian dari dalam Emacs, jalankan
(defun my-update-env ()
(interactive)
(let ((str
(with-temp-buffer
(insert-file-contents "env.txt")
(buffer-string))) lst)
(setq lst (split-string str "\000"))
(while lst
(setq cur (car lst))
(when (string-match "^\\(.*?\\)=\\(.*\\)" cur)
(setq var (match-string 1 cur))
(setq value (match-string 2 cur))
(setenv var value))
(setq lst (cdr lst)))))
Memperbarui
Saya ternyata ini bisa dilakukan dengan lebih elegan menggunakan --eval
opsi emacsclient
perintah: Tentukan skrip Bash update_emacs_env
:
#! /bin/bash
fn=tempfile
printenv -0 > "$fn"
emacsclient -s server_name -e '(my-update-env "'"$fn"'")' >/dev/null
di mana server_name
nama server Emacs Anda, dan my-update-env
merupakan fungsi yang ditentukan oleh ~/.emacs
file Anda :
(defun my-update-env (fn)
(let ((str
(with-temp-buffer
(insert-file-contents fn)
(buffer-string))) lst)
(setq lst (split-string str "\000"))
(while lst
(setq cur (car lst))
(when (string-match "^\\(.*?\\)=\\(.*\\)" cur)
(setq var (match-string 1 cur))
(setq value (match-string 2 cur))
(setenv var value))
(setq lst (cdr lst)))))
Sekarang Anda cukup mengetik update_emacs_env
dari baris perintah shell untuk memperbarui variabel lingkungan Emacs ..