spacemacs/layers/+emacs/smex/funcs.el
syl20bnr fb27ede558 Bump year in copyright headers
Happy New Year 2017!
2017-01-05 23:08:17 -05:00

23 lines
637 B
EmacsLisp

;;; funcs.el --- Smex Layer functions File for Spacemacs
;;
;; Copyright (c) 2012-2017 Sylvain Benner & Contributors
;;
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3
(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)))