(defvar smex-packages '(smex) "List of all packages to install and/or initialize. Built-in packages which require an initialization must be listed explicitly in the list.") (defun smex/init-smex () (use-package smex :defer t :init (progn (setq-default smex-history-length 32 smex-save-file (concat spacemacs-cache-directory ".smex-items")) (defun spacemacs/smex () "Execute smex with a better prompt." (interactive) (let ((smex-prompt-string "Emacs commands:")) (smex))) (defun spacemacs/smex-major-mode-commands () "Reexecute smex with major mode commands only." (interactive) (let ((smex-prompt-string (format "%s commands:" major-mode))) (smex-major-mode-commands))) (defun spacemacs/smex-define-keys () (when dotspacemacs-feature-toggle-leader-on-jk (evil-leader/set-key-for-mode 'ido-mode "g" 'smex-find-function "hdf" 'smex-describe-function "hw" 'smex-where-is)) (key-chord-define ido-completion-map (kbd "jk") (cdr (assoc 'ido-mode evil-leader--mode-maps)))) (evil-leader/set-key dotspacemacs-command-key 'spacemacs/smex) (evil-leader/set-key "m:" 'spacemacs/smex-major-mode-commands) (global-set-key (kbd "M-x") 'smex) (global-set-key (kbd "M-X") 'smex) (add-to-list 'ido-setup-hook 'spacemacs/smex-define-keys) ) ))