awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-03 12:27:26 -05:00
Code Issues Packages Projects Releases Wiki Activity

@map: remove :unset property (just set to nil instead)

Browse Source
This commit is contained in:
Henrik Lissner
2017-02-09 05:04:41 -05:00
parent be90fe8682
commit 7107d38d34
1 changed files with 0 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
core/core-lib.el
View File

@ -190,7 +190,6 @@ States
If omitted, the keybind will be defined globally. If omitted, the keybind will be defined globally.
Flags Flags
:unset [KEY] ; unset key
(:map [KEYMAP] [...]) ; inner keybinds are applied to KEYMAP (:map [KEYMAP] [...]) ; inner keybinds are applied to KEYMAP
(:prefix [PREFIX] [...]) ; assign prefix to all inner keybindings (:prefix [PREFIX] [...]) ; assign prefix to all inner keybindings
(:after [FEATURE] [...]) ; apply keybinds when [FEATURE] loads (:after [FEATURE] [...]) ; apply keybinds when [FEATURE] loads
@ -246,7 +245,6 @@ Example
`(vconcat ,prefix (if (stringp ,def) (kbd ,def) ,def)) `(vconcat ,prefix (if (stringp ,def) (kbd ,def) ,def))
`(vconcat ,prefix ,(if (stringp def) (kbd def) def)))))) `(vconcat ,prefix ,(if (stringp def) (kbd def) def))))))
(:map (setq keymaps (-list (pop rest)))) (:map (setq keymaps (-list (pop rest))))
(:unset `((@map ,(kbd (pop rest)))))
(:after (prog1 `((@after ,(pop rest) (@map ,@rest))) (setq rest '()))) (:after (prog1 `((@after ,(pop rest) (@map ,@rest))) (setq rest '())))
(:when (prog1 `((if ,(pop rest) (@map ,@rest))) (setq rest '()))) (:when (prog1 `((if ,(pop rest) (@map ,@rest))) (setq rest '())))
(:unless (prog1 `((if (not ,(pop rest)) (@map ,@rest))) (setq rest '()))) (:unless (prog1 `((if (not ,(pop rest)) (@map ,@rest))) (setq rest '())))