Don't override find-ls-option in case of Windows and when cmdproxy used.
--- a/.emacs-my Sat Apr 03 21:24:33 2010 +0400
+++ b/.emacs-my Tue Apr 06 22:50:47 2010 +0300
@@ -256,7 +256,7 @@
(setq grep-highlight-matches nil)
(setq grep-use-null-device nil)
;; For find-dired.
-(setq find-ls-option '("-exec ls -ld {} \\;" . "-ld"))
+;; (setq find-ls-option '("-exec ls -ld {} \\;" . "-ld"))
(global-set-key [M-f7] 'rgrep)
@@ -636,20 +636,20 @@
(when (eq window-system 'w32) ; may require Cygwin or MSYS
(setenv "ESHELL" "bash")
- (if my-use-windows-shell
- ;; Restore shell name if user set SHELL env var for Cygwin/MSYS.
- (setq shell-file-name (concat exec-directory "cmdproxy.exe"))
+ (when my-use-windows-shell
+ ;; Restore shell name if user set SHELL env var for Cygwin/MSYS.
+ (setq shell-file-name (concat exec-directory "cmdproxy.exe"))
;; Use shell from Cygwin/MinGW.
(setq shell-file-name "sh")
+ ;; Here is workaround: when explicit-shell-file-name is "bash" and shell-file-name is "cmdproxy.exe"
+ ;; find-dired incorrect quote args (in shell-quote-argument (w32-shell-name) return "bash", but
+ ;; shell-command used shell-file-name which value "cmdproxy.exe"). So I put additional space in pattern to
+ ;; prevent quoting.
+ (setq find-ls-option '("-exec ls -ld {} ;" . "-ld"))
)
;; (setq explicit-shell-file-name "bash")
(setq explicit-bash-args '("-i"))
(setq explicit-sh-args '("-i"))
- ;; Here is workaround: when explicit-shell-file-name is "bash" and shell-file-name is "cmdproxy.exe"
- ;; find-dired incorrect quote args (in shell-quote-argument (w32-shell-name) return "bash", but
- ;; shell-command used shell-file-name which value "cmdproxy.exe"). So I put additional space in pattern to
- ;; prevent quoting.
- (setq find-ls-option '("-exec ls -ld {} ;" . "-ld"))
)
;; ======================================================================