diff options
author | Ian Eure <ian@retrospec.tv> | 2019-02-02T00·55-0800 |
---|---|---|
committer | Chris Feng <chris.w.feng@gmail.com> | 2019-02-06T00·00+0000 |
commit | ec108a61dc38f84a3b290f022929331e97784842 (patch) | |
tree | 6d3359c420940129af746b2af071d3e7b12933b1 /exwm-input.el | |
parent | 0f7269c4ec666eb8bcf2616abbb5af46087cbdea (diff) |
Cleanup simulation key config issues
* exwm-input.el (exwm-input-simulation-keys): Original key only has one option, so probably shouldn’t be a `choice` type; Move the "User-defined" key value to the top, since that’s the one someone is most likely to want). * exwm-config.el (exwm-config-default): Only set custom vars if there isn’t a saved value for them.
Diffstat (limited to 'exwm-input.el')
-rw-r--r-- | exwm-input.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/exwm-input.el b/exwm-input.el index 4f64d35dd63d..04020acfaf2e 100644 --- a/exwm-input.el +++ b/exwm-input.el @@ -915,8 +915,9 @@ Notes: * The predefined examples in the Customize interface are not guaranteed to work for all applications. This can be tweaked on a per application basis with `exwm-input-set-local-simulation-keys'." - :type '(alist :key-type (choice (key-sequence :tag "Original")) - :value-type (choice (key-sequence :tag "Move left" [left]) + :type '(alist :key-type (key-sequence :tag "Original") + :value-type (choice (key-sequence :tag "User-defined") + (key-sequence :tag "Move left" [left]) (key-sequence :tag "Move right" [right]) (key-sequence :tag "Move up" [up]) (key-sequence :tag "Move down" [down]) @@ -928,8 +929,7 @@ Notes: (key-sequence :tag "Paste" [C-v]) (key-sequence :tag "Delete" [delete]) (key-sequence :tag "Delete to EOL" - [S-end delete]) - (key-sequence :tag "User-defined"))) + [S-end delete]))) :set (lambda (symbol value) (set symbol value) (exwm-input--set-simulation-keys value))) |