Skip to content

Commit

Permalink
Place terminals' customization variables in their own sub-group
Browse files Browse the repository at this point in the history
  • Loading branch information
CyberShadow committed Nov 10, 2017
1 parent e28ed80 commit a00580d
Show file tree
Hide file tree
Showing 3 changed files with 18 additions and 3 deletions.
7 changes: 6 additions & 1 deletion term-keys-konsole.el
Original file line number Diff line number Diff line change
Expand Up @@ -31,6 +31,11 @@
(require 'term-keys)


(defgroup term-keys/konsole nil
"`term-keys' options for the Konsole terminal emulator."
:group 'term-keys)


(define-widget 'term-keys/konsole-modifier 'lazy
"Choice for Konsole key binding modifiers and state flags."
:type '(choice (const "Shift")
Expand Down Expand Up @@ -63,7 +68,7 @@ for this modifier."
(term-keys/konsole-modifier :tag "Super")
(term-keys/konsole-modifier :tag "Hyper")
(term-keys/konsole-modifier :tag "Alt"))
:group 'term-keys)
:group 'term-keys/konsole)


(defun term-keys/konsole-keytab ()
Expand Down
7 changes: 6 additions & 1 deletion term-keys-linux.el
Original file line number Diff line number Diff line change
Expand Up @@ -31,6 +31,11 @@
(require 'term-keys)


(defgroup term-keys/linux nil
"`term-keys' options for the Linux TTY."
:group 'term-keys)


(define-widget 'term-keys/linux-modifier 'lazy
"Choice for Linux modifiers for keymap files."
:type '(choice (const "Shift")
Expand Down Expand Up @@ -60,7 +65,7 @@ nil indicates that there is no mapping for this modifier."
(term-keys/linux-modifier :tag "Super")
(term-keys/linux-modifier :tag "Hyper")
(term-keys/linux-modifier :tag "Alt"))
:group 'term-keys)
:group 'term-keys/linux)


(defcustom term-keys/linux-first-function-key 13
Expand Down
7 changes: 6 additions & 1 deletion term-keys-st.el
Original file line number Diff line number Diff line change
Expand Up @@ -31,6 +31,11 @@
(require 'term-keys)


(defgroup term-keys/st nil
"`term-keys' options for the st terminal emulator."
:group 'term-keys)


(define-widget 'term-keys/x11-modifier 'lazy
"Choice for X11 key modifier state flags."
:type '(choice (const "Shift")
Expand Down Expand Up @@ -60,7 +65,7 @@ there is no mapping for this modifier."
(term-keys/x11-modifier :tag "Super")
(term-keys/x11-modifier :tag "Hyper")
(term-keys/x11-modifier :tag "Alt"))
:group 'term-keys)
:group 'term-keys/st)


(defun term-keys/x11-apply-mod-state (key shift lock control mod1 mod2 mod3 mod4 mod5)
Expand Down

0 comments on commit a00580d

Please sign in to comment.