equal
deleted
inserted
replaced
304 (setq search-highlight t) ; highlight incremental search |
304 (setq search-highlight t) ; highlight incremental search |
305 |
305 |
306 ;;; ---------------------------------------------------------------- |
306 ;;; ---------------------------------------------------------------- |
307 ;;; grep, find. |
307 ;;; grep, find. |
308 |
308 |
309 ;; (require 'grep) |
|
310 |
|
311 ;; This settings have effect from Emacs 22.x. |
309 ;; This settings have effect from Emacs 22.x. |
312 (when (eq system-type 'windows-nt) |
310 (when (eq system-type 'windows-nt) |
313 ;; Workaround for Cygwin shell, when set 'CYGWIN=noglob'. By default 'shell-quote-argument' |
311 ;; Workaround for Cygwin shell, when set 'CYGWIN=noglob'. By default 'shell-quote-argument' |
314 ;; quoted by double '\' chars this cause failure. |
312 ;; quoted by double '\' chars this cause failure. |
315 (defun shell-quote-argument (argument) |
313 (defun shell-quote-argument (argument) |
321 |
319 |
322 ;; Do not set t because some grep do not has --color options. |
320 ;; Do not set t because some grep do not has --color options. |
323 (setq grep-highlight-matches nil) |
321 (setq grep-highlight-matches nil) |
324 (setq grep-use-null-device nil) |
322 (setq grep-use-null-device nil) |
325 |
323 |
326 (add-to-list 'grep-find-ignored-directories "build" t) |
324 (eval-after-load 'grep |
327 (add-to-list 'grep-find-ignored-directories "dist" t) |
325 (lambda nil |
328 (add-to-list 'grep-find-ignored-directories "lib" t) |
326 (add-to-list 'grep-find-ignored-directories "build" t) |
329 |
327 (add-to-list 'grep-find-ignored-directories "dist" t) |
330 (add-to-list 'grep-find-ignored-files "*TAGS") |
328 (add-to-list 'grep-find-ignored-directories "lib" t) |
331 (add-to-list 'grep-find-ignored-files "GPATH") |
329 |
|
330 (add-to-list 'grep-find-ignored-files "*TAGS") |
|
331 (add-to-list 'grep-find-ignored-files "GPATH") |
|
332 )) |
332 |
333 |
333 (global-set-key [M-f7] 'rgrep) |
334 (global-set-key [M-f7] 'rgrep) |
334 |
335 |
335 ;;; ---------------------------------------------------------------- |
336 ;;; ---------------------------------------------------------------- |
336 ;;; syntax highlighting. |
337 ;;; syntax highlighting. |