--- a/.emacs-my	Wed Jun 30 17:12:43 2010 +0300
+++ b/.emacs-my	Tue Jul 13 11:26:33 2010 +0300
@@ -251,7 +251,7 @@
       (append my-text-mode-hook-list my-devel-mode-hook-list my-scroll-margin-mode-hook-list) )
 
 ;; ----------------------------------------------------------------------
-;; searching.
+;; search, isearch, occur.
 
 (setq case-fold-search t)
 
@@ -259,10 +259,6 @@
 (setq search-highlight t)               ; highlight incremental search
 
 ;; ----------------------------------------------------------------------
-;; *Occur*
-(global-set-key [f7] 'occur)            ; Key binding as in mc
-
-;; ----------------------------------------------------------------------
 ;; grep, find.
 
 ;; Assume that we have GNU grep, so -H available.