Guest User

Untitled

a guest
May 26th, 2018
86
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.20 KB | None | 0 0
  1. (defun read-system-path ()
  2. (with-temp-buffer
  3. (insert-file-contents "/etc/paths")
  4. (goto-char (point-min))
  5. (replace-regexp "\n" ":")
  6. (thing-at-point 'line)))
  7.  
  8. (setenv "PATH" (read-system-path))
Add Comment
Please, Sign In to add comment