equal
deleted
inserted
replaced
496 |
496 |
497 ;; Make old Emacs key binding like in Emacs 23.x. |
497 ;; Make old Emacs key binding like in Emacs 23.x. |
498 (when (< emacs-major-version 23) |
498 (when (< emacs-major-version 23) |
499 (global-set-key (kbd "M-s o") 'occur) |
499 (global-set-key (kbd "M-s o") 'occur) |
500 ) |
500 ) |
501 (global-set-key [f7] 'occur) |
|
502 |
501 |
503 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
502 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
504 (message "grep, find") |
503 (message "grep, find") |
505 |
504 |
506 ;; -ls produce very noisy output: |
505 ;; -ls produce very noisy output: |
525 (when (boundp 'grep-find-ignored-files) |
524 (when (boundp 'grep-find-ignored-files) |
526 (add-to-list 'grep-find-ignored-files "*TAGS") |
525 (add-to-list 'grep-find-ignored-files "*TAGS") |
527 (add-to-list 'grep-find-ignored-files "GPATH") |
526 (add-to-list 'grep-find-ignored-files "GPATH") |
528 ) |
527 ) |
529 )) |
528 )) |
530 |
529 (global-set-key [f7] 'rgrep) |
531 (global-set-key [M-f7] 'rgrep) |
530 (global-set-key [M-f7] 'rgrep) |
532 |
531 |
533 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
532 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
534 (message "syntax highlighting") |
533 (message "syntax highlighting") |
535 |
534 |