# HG changeset patch # User Oleksandr Gavenko # Date 1463569530 -10800 # Node ID 33de58ab0d116db3d36db1431acbb4d3afc396f3 # Parent af560c8f3d54cfe343fd604c2732f91d483937e9 Activate Cygwin for native Windows Emacs if available. diff -r af560c8f3d54 -r 33de58ab0d11 .emacs-my --- a/.emacs-my Sun May 15 23:31:06 2016 +0300 +++ b/.emacs-my Wed May 18 14:05:30 2016 +0300 @@ -440,6 +440,10 @@ (eval-when 'compile (require 'shell)) +;; Activate Cygwin for native Windows Emacs if available. +(when (and (eq window-system 'w32) (require 'cygwin-mount nil t)) + (cygwin-mount-activate)) + (defvar my-use-windows-shell nil "If t 'cmdproxy.exe' will be used as shell. Affect on \\[shell] like commands. If nil, 'sh' will be used." ) @@ -1486,7 +1490,6 @@ (eval-when 'compile (require 'woman)) -;; Assume that cygwin-mount already activated. (when (featurep 'cygwin-mount) (let ( (path (expand-file-name "~")) ) (when (string-match "\\([c-z]\\):/" path) diff -r af560c8f3d54 -r 33de58ab0d11 .emacs-post --- a/.emacs-post Sun May 15 23:31:06 2016 +0300 +++ b/.emacs-post Wed May 18 14:05:30 2016 +0300 @@ -4,11 +4,6 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -;; (require 'cygwin-mount) -;; (cygwin-mount-activate) - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - ;; (when (featurep 'jabber) ;; (setq jabber-account-list ;; '(