--- a/.emacs-my	Sun Nov 06 00:16:54 2011 +0200
+++ b/.emacs-my	Sun Nov 06 00:40:26 2011 +0200
@@ -498,7 +498,6 @@
 (when (< emacs-major-version 23)
   (global-set-key (kbd "M-s o") 'occur)
   )
-(global-set-key [f7] 'occur)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "grep, find")
@@ -527,7 +526,7 @@
        (add-to-list 'grep-find-ignored-files "GPATH")
        )
      ))
-
+(global-set-key [f7] 'rgrep)
 (global-set-key [M-f7] 'rgrep)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;