lisp/+embark.el


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

;;; +embark.el -*- lexical-binding: t; -*-

;;; Commentary:

;; https://github.com/oantolin/embark/wiki/Additional-Actions

;;; Code:

(require 'embark)
(require 'marginalia)

(embark-define-keymap embark-straight-map
  ("u" straight-visit-package-website)
  ("r" straight-get-recipe)
  ("i" straight-use-package)
  ("c" straight-check-package)
  ("F" straight-pull-package)
  ("f" straight-fetch-package)
  ("p" straight-push-package)
  ("n" straight-normalize-package)
  ("m" straight-merge-package))

(add-to-list 'embark-keymap-alist '(straight . embark-straight-map))

(add-to-list 'marginalia-prompt-categories '("recipe\\|package" . straight))

(provide '+embark)
;;; +embark.el ends here