Emacs: Dired omit files, mouse avoidance, mark symbol for regexp-search

.emacs.d/lisp/functions.el

@@ -246,6 +246,12 @@ it appears in the minibuffer prompt."
          (insert filename))))
 (define-key my-keys-minor-mode-map "\C-x\M-f" 'insert-file-name)
 
+(defun insert-symbol-at-point-in-regexp-search-ring ()
+  "Insert symbol at point in regexp search ring."
+  (interactive)
+  (add-to-list 'regexp-search-ring (find-tag-default-as-symbol-regexp)))
+(define-key my-keys-minor-mode-map "\M-#" 'insert-symbol-at-point-in-regexp-search-ring)
+
 (defun kill-all-buffers ()
   "Kill all buffers, leaving *scratch* only."
   (interactive)

.emacs.d/lisp/main.el

@@ -346,13 +346,16 @@
 ;; Read Matlab files in Octave mode.
 (add-to-list 'auto-mode-alist '("\\.m\\'" . octave-mode))
 
-;; hs
+;; Easy code folding toggle.
 (add-hook 'prog-mode-hook 'hs-minor-mode)
 (add-hook 'prog-mode-hook (lambda () (local-set-key (kbd "C-c h") 'hs-toggle-hiding)))
 
-;; ff
+;; Toggle between source file and header.
 (define-key my-keys-minor-mode-map (kbd "C-c o") 'ff-find-other-file)
 
+;; Move mouse away.
+(mouse-avoidance-mode 'banish)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (provide 'main)
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

.emacs.d/lisp/mode-dired.el

@@ -12,11 +12,13 @@
 (dired-internal-noselect dired-directory dired-listing-switches)
 
 (setq wdired-allow-to-change-permissions t)
+(put 'dired-find-alternate-file 'disabled nil)
 
+;; omit-mode needs to be started _after_ omit-files redefinition.
 (require 'dired-x)
 (setq dired-omit-files "^\\.")
-;; omit-mode needs to be start _after_ omit-files redefinition.
 (dired-omit-mode)
+(add-hook 'dired-mode-hook (lambda () (dired-omit-mode 1)))
 
 (require 'tool-pdf) ; for `pdf-viewer'
 (setq dired-guess-shell-alist-user