                                               anything-c-source-file-cache
                                               anything-c-source-files-in-current-dir+
                                               anything-c-source-locate)
-  "Your prefered sources to find files with `anything-for-files'."
+  "Your prefered sources to find files."
   :type 'list
   :group 'anything-config)
-
-(defcustom anything-info-at-point-prefered-list '(anything-c-source-info-elisp
-                                                  anything-c-source-info-cl
-                                                  anything-c-source-info-pages)
-  "Your favorites info sources to find infos with `anything-info-at-point'."
-  :type 'list
-  :group 'anything-config)
-  
-
+ 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Preconfigured Anything ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (defun anything-for-files ()
   "Preconfigured `anything' for opening files.
 ffap -> recentf -> buffer -> bookmark -> file-cache -> files-in-current-dir -> locate"
   (interactive)
   (anything anything-for-files-prefered-list))
+  ;; (anything '(anything-c-source-ffap-line
+  ;;             anything-c-source-ffap-guesser
+  ;;             anything-c-source-recentf
+  ;;             anything-c-source-buffers+
+  ;;             anything-c-source-bookmarks
+  ;;             anything-c-source-file-cache
+  ;;             anything-c-source-files-in-current-dir+
+  ;;             anything-c-source-locate)))
 
 (defun anything-info-at-point ()
   "Preconfigured `anything' for searching info at point."
   (interactive)
-  (anything anything-info-at-point-prefered-list
+  (anything '(anything-c-source-info-elisp
+              anything-c-source-info-cl
+              anything-c-source-info-pages)
             (thing-at-point 'symbol)))
 
 (defun anything-show-kill-ring ()

;;    What command to use for root access.
;;    default = "su"
;;  `anything-for-files-prefered-list'
;;    Your prefered sources to find files with `anything-for-files'.
;;    default = (quote (anything-c-source-ffap-line anything-c-source-ffap-guesser anything-c-source-recentf anything-c-source-buffers+ anything-c-source-bookmarks ...))
;;  `anything-info-at-point-prefered-list'
;;    Your favorites info sources to find infos with `anything-info-at-point'.
;;    default = (quote (anything-c-source-info-elisp anything-c-source-info-cl anything-c-source-info-pages))
;;  `anything-create--actions-private'
;;    User defined actions for `anything-create' / `anything-c-source-create'.
;;    default = nil

(defvar anything-c-source-minibuffer-history
  '((name . "Minibuffer History")
    (header-name . (lambda (name) (format "%s (%s)" name minibuffer-history-variable)))
    (candidates . (lambda () (let ((history (symbol-value minibuffer-history-variable)))
                               (if (consp (car history))
                                   (mapcar 'prin1-to-string history)
                                 history))))
    (migemo)
    (action . insert)))
;; (anything 'anything-c-source-minibuffer-history)

;;;; <System>

;;; X RandR resolution change
