.emacs-my
changeset 1732 c3279bad1cc3
parent 1731 fec5d1fffe8c
child 1733 316d6f077e1c
--- a/.emacs-my	Wed Jun 02 00:34:11 2021 +0300
+++ b/.emacs-my	Wed Jun 02 18:04:53 2021 +0300
@@ -555,6 +555,14 @@
 (when (and (eq system-type 'cygwin) (fboundp #'cygwin-winpath-activate))
   (cygwin-winpath-activate))
 
+;; Add some standard places to PATH as Emacs is not started from login shell
+;; on Windows...
+(when (eq system-type 'cygwin)
+  (mapc (lambda (path)
+          (unless (cl-search (concat ":" path ":") (concat ":" (getenv "PATH") ":"))
+            (setenv "PATH" (concat (getenv "PATH") ":" path))))
+        (list (expand-file-name "~/.local/bin") "/usr/local/bin")))
+
 (defun follow-cygwin-symlink ()
   "Follow new-style (and also UCS-16) Cygwin symlinks."
   (save-excursion