syscfg/emacs/module/module-embark.el

28 lines
689 B
EmacsLisp

;;; module-embark.el --- context-sensitive actions -*- lexical-binding: t; -*-
;;;
;;; Commentary:
;;;
;;; Provide context-sensitive actions on current target, including
;;; minibuffer targets.
;;;
;;; Code:
(require 'module-pkg)
(pkg/require 'embark)
(setq prefix-help-command #'embark-prefix-help-command)
(add-to-list 'display-buffer-alist
'("\\`\\*Embark Collect \\(Live\\|Completions\\)\\*"
nil
(window-parameters (mode-line-format . none))))
(global-set-key (kbd "C-.") #'embark-act)
(global-set-key (kbd "C-;") #'embark-dwim)
(global-set-key (kbd "C-h B") #'embark-bindings)
(provide 'module-embark)
;;; module-embark.el ends here.