summaryrefslogtreecommitdiffstats
path: root/ravi-init-ido.el
diff options
context:
space:
mode:
authorRavi R Kiran <aine.marina@gmail.com>2015-03-17 04:17:17 (GMT)
committerRavi R Kiran <aine.marina@gmail.com>2015-03-17 04:17:17 (GMT)
commita6e94a30a835ea389fe8fc40df162ff327035ccb (patch)
treecf695ab8c77b2c78434b2c6913295641a9287110 /ravi-init-ido.el
parentb94602dccfa28b997b1fc1f2e0373d997f4b95ce (diff)
downloaddotemacs-a6e94a30a835ea389fe8fc40df162ff327035ccb.zip
dotemacs-a6e94a30a835ea389fe8fc40df162ff327035ccb.tar.gz
dotemacs-a6e94a30a835ea389fe8fc40df162ff327035ccb.tar.bz2
Move main emacs directory out of load path
This follows the official emacs recommendation for lisp code inside emacs.d.
Diffstat (limited to 'ravi-init-ido.el')
-rw-r--r--ravi-init-ido.el164
1 files changed, 0 insertions, 164 deletions
diff --git a/ravi-init-ido.el b/ravi-init-ido.el
deleted file mode 100644
index 93af3e6..0000000
--- a/ravi-init-ido.el
+++ /dev/null
@@ -1,164 +0,0 @@
-;;; ravi-init-ido.el --- ido initialization
-
-;; Copyright (C) 2013
-
-;; Author: <ravi@nero.lan>
-;; Keywords:
-
-;; This program is free software; you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; This program is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with this program. If not, see <http://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Ido initialization
-
-;;; Code:
-
-;; Almost all of the code below is stolen from jwiegley's .emacs.d.
-
-(use-package ibuffer
- :bind ("C-x C-b" . ibuffer)
- :config
- (progn
-
- (use-package ibuffer-vc
- :ensure t
- :commands ibuffer-vc-set-filter-groups-by-vc-root
- )
-
- ;; Switching to ibuffer puts the cursor on the most recent past buffer
- (defadvice ibuffer (around ibuffer-point-to-most-recent-but-one activate) ()
- "Open ibuffer with cursor pointed to most recent buffer name"
- (let ((recent-buffer-name (buffer-name (other-buffer (current-buffer) t))))
- ad-do-it
- (ibuffer-jump-to-buffer recent-buffer-name)))
-
- (defun ravi/ibuffer-vc-sort-hook ()
- (ibuffer-vc-set-filter-groups-by-vc-root)
- (unless (eq ibuffer-sorting-mode 'alphabetic)
- (ibuffer-do-sort-by-alphabetic)))
- (add-hook 'ibuffer-hook 'ravi/ibuffer-vc-sort-hook)
- )
- )
-
-(use-package ace-jump-buffer
- :bind (("M-<f1>" . ace-jump-buffer)
- ("C-<f1>" . ace-jump-buffer-other-window)
- ("S-<f1>" . ace-jump-projectile-buffers))
- ;; :config
- ;; (progn
- ;; (bind-key "M-<f1>" 'ido-switch-buffer))
- :ensure t)
-
-;;;_ , ido
-
-(use-package ido
- :defines (ido-cur-item
- ido-require-match
- ido-selected
- ido-final-text
- ido-show-confirm-message)
- :if (not ravi/use-helm-instead-of-ido)
- :init
- (ido-mode 1)
-
- :config
- (progn
- (use-package ido-hacks
- :config
- (ido-hacks-mode 1)
- :ensure t
- )
-
- (use-package flx-ido
- :config
- (progn
- (use-package flx
- :ensure t)
- (flx-ido-mode 1)
- )
- :ensure t
- )
- (setq ido-use-filename-at-point 'guess)
- (setq ido-use-virtual-buffers t)
- (setq ido-create-new-buffer 'always)
-
- (use-package ido-ubiquitous
- :config
- (ido-ubiquitous-mode t)
- :ensure t
- )
-
- (use-package ido-vertical-mode
- :config
- (ido-vertical-mode 1)
- :ensure t
- )
-
- (defun ido-smart-select-text ()
- "Select the current completed item. Do NOT descend into directories."
- (interactive)
- (when (and (or (not ido-require-match)
- (if (memq ido-require-match
- '(confirm confirm-after-completion))
- (if (or (eq ido-cur-item 'dir)
- (eq last-command this-command))
- t
- (setq ido-show-confirm-message t)
- nil))
- (ido-existing-item-p))
- (not ido-incomplete-regexp))
- (when ido-current-directory
- (setq ido-exit 'takeprompt)
- (unless (and ido-text (= 0 (length ido-text)))
- (let ((match (ido-name (car ido-matches))))
- (throw 'ido
- (setq ido-selected
- (if match
- (replace-regexp-in-string "/\\'" "" match)
- ido-text)
- ido-text ido-selected
- ido-final-text ido-text)))))
- (exit-minibuffer)))
-
- (add-hook 'ido-minibuffer-setup-hook
- #'(lambda ()
- (bind-key "<return>" 'ido-smart-select-text
- ido-file-completion-map)))
-
- (defun ido-switch-buffer-tiny-frame (buffer)
- (interactive (list (ido-read-buffer "Buffer: " nil t)))
- (with-selected-frame
- (make-frame '((width . 80)
- (height . 22)
- (left-fringe . 0)
- (right-fringe . 0)
- (vertical-scroll-bars . nil)
- (unsplittable . t)
- (has-modeline-p . nil)
- ;;(background-color . "grey80")
- (minibuffer . nil)))
- (switch-to-buffer buffer)
- (set (make-local-variable 'mode-line-format) nil)))
-
- (bind-key "C-x 5 t" 'ido-switch-buffer-tiny-frame)))
-
-(use-package smex
- :init
- (global-set-key [remap execute-extended-command] 'smex)
- :if (not ravi/use-helm-instead-of-ido)
- :ensure t
- )
-
-(provide 'ravi-init-ido)
-;;; ravi-init-ido.el ends here