| @@ -1789,23 +1789,21 @@ if arg given, use that eshell buffer, otherwise make new eshell buffer." | |||||
| (interactive) | (interactive) | ||||
| (require 'grep) | (require 'grep) | ||||
| (let ((--grep-command-bak grep-command) | (let ((--grep-command-bak grep-command) | ||||
| (--grep-use-null-device-bak grep-use-null-device) | |||||
| (grep-command (if (eq 0 | |||||
| (shell-command "git rev-parse --git-dir")) | |||||
| "git --no-pager grep -nH -e " | |||||
| grep-command | |||||
| ))) | |||||
| (grep-apply-setting 'grep-command | |||||
| grep-command) | |||||
| (grep-apply-setting 'grep-use-null-device | |||||
| nil) | |||||
| (--grep-use-null-device-bak grep-use-null-device)) | |||||
| (if (called-interactively-p 'any) | (if (called-interactively-p 'any) | ||||
| (call-interactively 'grep) | |||||
| (message "my-grep only allow interactive call.")) | |||||
| (grep-apply-setting 'grep-command | |||||
| --grep-command-bak) | |||||
| (grep-apply-setting 'grep-use-null-device | |||||
| --grep-use-null-device-bak))) | |||||
| (progn | |||||
| (when (eq 0 | |||||
| (shell-command "git rev-parse --git-dir")) | |||||
| (grep-apply-setting 'grep-command | |||||
| "git --no-pager grep -nH -e ") | |||||
| (grep-apply-setting 'grep-use-null-device | |||||
| nil)) | |||||
| (call-interactively 'grep) | |||||
| (grep-apply-setting 'grep-command | |||||
| --grep-command-bak) | |||||
| (grep-apply-setting 'grep-use-null-device | |||||
| --grep-use-null-device-bak)) | |||||
| (message "my-grep only allow interactive call.")))) | |||||
| (defun make () | (defun make () | ||||
| "Run \"make -k\" in current directory." | "Run \"make -k\" in current directory." | ||||