2014-07-15 02:21:56 -04:00
|
|
|
(require-packages
|
2014-07-16 03:28:06 -04:00
|
|
|
'(ido-ubiquitous ; enhances ido-everywhere
|
|
|
|
projectile ; project search (like ctrlp)
|
|
|
|
helm ; augments search of, well, anything
|
|
|
|
grizzl ; better searching engine for projectile
|
|
|
|
ag ; the_silver_searcher support
|
|
|
|
sr-speedbar ; speedbar, w/o the separate frame
|
|
|
|
flx-ido ; enhances ido's flex matching
|
|
|
|
ido-vertical-mode ; vertical listing for ido completion
|
2014-07-15 02:21:56 -04:00
|
|
|
))
|
|
|
|
|
|
|
|
;;#dired
|
|
|
|
(setq dired-recursive-deletes 'always
|
|
|
|
dired-recursive-copies 'always
|
|
|
|
|
|
|
|
;; if there is a dired buffer displayed in the next window, use its
|
|
|
|
;; current subdir, instead of the current subdir of this dired buffer
|
|
|
|
dired-dwim-target t)
|
|
|
|
|
|
|
|
;; ido remaps its keys every time it's invoked, this screws with
|
|
|
|
;; custom mappings. So we've gotta neuter ido.
|
|
|
|
(defun ido-init-completion-maps ())
|
|
|
|
|
|
|
|
(setq ido-common-completion-map (make-sparse-keymap))
|
|
|
|
(setq ido-file-dir-completion-map (make-sparse-keymap))
|
|
|
|
(setq ido-file-completion-map (make-sparse-keymap))
|
|
|
|
(setq ido-buffer-completion-map (make-sparse-keymap))
|
|
|
|
|
|
|
|
(set-keymap-parent ido-common-completion-map minibuffer-local-map)
|
|
|
|
(set-keymap-parent ido-file-dir-completion-map ido-common-completion-map)
|
|
|
|
(set-keymap-parent ido-file-completion-map ido-file-dir-completion-map)
|
|
|
|
(set-keymap-parent ido-buffer-completion-map ido-common-completion-map)
|
|
|
|
|
|
|
|
(ido-mode 1)
|
2014-07-16 03:28:06 -04:00
|
|
|
(ido-vertical-mode 1)
|
2014-07-15 02:21:56 -04:00
|
|
|
(ido-everywhere 1)
|
|
|
|
(flx-ido-mode 1)
|
|
|
|
(setq ido-use-faces nil
|
|
|
|
ido-confirm-unique-completion t
|
|
|
|
ido-case-fold t
|
|
|
|
ido-enable-tramp-completion nil
|
|
|
|
ido-enable-flex-matching t
|
|
|
|
ido-create-new-buffer 'always
|
|
|
|
ido-enable-tramp-completion t
|
|
|
|
ido-enable-last-directory-history t)
|
|
|
|
|
2014-07-16 03:28:06 -04:00
|
|
|
(defadvice completion--file-name-table (after ignoring-backups-f-n-completion activate)
|
|
|
|
"Filter out results when they match `completion-ignored-extensions'."
|
|
|
|
(let ((res ad-return-value))
|
|
|
|
(if (and (listp res)
|
|
|
|
(stringp (car res))
|
|
|
|
(cdr res)) ; length > 1, don't ignore sole match
|
|
|
|
(setq ad-return-value
|
|
|
|
(completion-pcm--filename-try-filter res)))))
|
|
|
|
|
2014-07-15 02:21:56 -04:00
|
|
|
;;#projectile
|
|
|
|
(setq projectile-completion-system 'grizzl
|
|
|
|
projectile-enable-caching t)
|
|
|
|
|
|
|
|
;;#sr-speedbar
|
|
|
|
(setq speedbar-use-images nil)
|
|
|
|
|
|
|
|
;;
|
|
|
|
(provide 'core-project)
|