Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defun read-system-path ()
- (with-temp-buffer
- (insert-file-contents "/etc/paths")
- (goto-char (point-min))
- (replace-regexp "\n" ":")
- (thing-at-point 'line)))
- (setenv "PATH" (read-system-path))
Add Comment
Please, Sign In to add comment