diff options
-rw-r--r-- | init.el | 1 | ||||
-rw-r--r-- | lisp/init-ido.el | 26 |
2 files changed, 27 insertions, 0 deletions
@@ -146,6 +146,7 @@ (load "email.el") (load "init-org.el") (require 'my/init-org) +(load "init-ido.el") (load "init-completion.el") (load "init-geiser.el") (load "init-gnus.el") diff --git a/lisp/init-ido.el b/lisp/init-ido.el new file mode 100644 index 0000000..5cbf566 --- /dev/null +++ b/lisp/init-ido.el @@ -0,0 +1,26 @@ +;; ido mode +(require 'ido) +(require 'ido-vertical-mode) +(ido-mode 1) +(ido-vertical-mode 1) +(setq ido-vertical-define-keys 'C-n-and-C-p-only) +(setq ido-ubiquitous-max-items 50000) +;; hit ~ to go straight to the home directory in ido mode +(add-hook 'ido-setup-hook + (lambda () + ;; Go straight home + (define-key ido-file-completion-map + (kbd "~") + (lambda () + (interactive) + (if (looking-back "/") + (insert "~/") + (call-interactively 'self-insert-command)))))) + +;; Use ido everywhere +(require 'ido-ubiquitous) +(ido-ubiquitous-mode 1) +(fset 'yes-or-no-p 'y-or-n-p) + +;; open file at point with C-x C-f +(setq ido-use-filename-at-point 'guess) |