spacemacs/layers/+emacs/smex/funcs.el

23 lines
637 B
EmacsLisp
Raw Normal View History

2016-05-16 01:52:10 +00:00
;;; funcs.el --- Smex Layer functions File for Spacemacs
;;
2021-03-22 20:11:29 +00:00
;; Copyright (c) 2012-2021 Sylvain Benner & Contributors
2016-05-16 01:52:10 +00:00
;;
;; 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)))