 (global-set-key (kbd "C-<prior>") 'next-buffer) ;; page up
 (global-set-key (kbd "C-<next>") 'previous-buffer) ;; page down
 
-(global-set-key (kbd "C-f") 'isearch-forward)
+;(global-set-key (kbd "C-f") 'isearch-forward)
 ;(global-set-key (kbd "C-f") 'isearch-repeat-forward)
-(global-set-key (kbd "C-S-f") 'isearch-backward)
+;(global-set-key (kbd "C-S-f") 'isearch-backward)
 ;(global-set-key (kbd "C-S-f") 'isearch-repeat-backward)
 
 (global-set-key (kbd "C-M-<prior>") 'isearch-ring-retreat)

  "Return a new file path of a given file path.
If the new path's directories does not exist, create them."
  (let (backup-root bpath)
    (setq backup-root "~/.emacs.d/emacs-backup")
    (setq bpath (concat backup-root fPath "~"))
    (make-directory (file-name-directory bpath) bpath)
    bpath

                            (mode . gnus-article-mode)
                            (name . "^\\.bbdb$")
                            (name . "^\\.newsrc-dribble")))))))
(add-hook 'ibuffer-mode-hook
	  (lambda ()
	    (ibuffer-switch-to-saved-filter-groups "default")))

	
(custom-set-faces
