diff options
Diffstat (limited to 'lib/wm/jao-x11.el')
| -rw-r--r-- | lib/wm/jao-x11.el | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/lib/wm/jao-x11.el b/lib/wm/jao-x11.el index 16566d8..788bfe6 100644 --- a/lib/wm/jao-x11.el +++ b/lib/wm/jao-x11.el @@ -23,53 +23,53 @@ (jao-shell-def-exec jao-bright-set-up "brightnessctl" "-q" "s" "5%+") (jao-shell-def-exec jao-bright-set-down "brightnessctl" "-q" "s" "5%-") -(defun jao-brightness () +(defun jao-x11-brightness () (string-trim (or (cadr (jao-shell-cmd-lines "brightnessctl")) "(Unknown)"))) ;;;###autoload -(defun jao-bright-show () +(defun jao-x11-bright-show () (interactive) - (message "%s" (jao-brightness))) + (message "%s" (jao-x11-brightness))) ;;;###autoload -(defun jao-bright-up () +(defun jao-x11-bright-up () (interactive) (jao-shell-exec "brightnessctl -q s 5%%+" t) - (jao-bright-show)) + (jao-x11-bright-show)) ;;;###autoload -(defun jao-bright-down () +(defun jao-x11-bright-down () (interactive) (jao-shell-exec "brightnessctl -q s 5%%-" t) - (jao-bright-show)) + (jao-x11-bright-show)) ;;; Keyboard ;;;###autoload -(defun jao-kb-layout () +(defun jao-x11-kb-layout () (string-trim (shell-command-to-string "setxkbmap -query | grep 'layout:' | awk '{print $2}'"))) ;;;###autoload -(defun jao-kb-set (lyt &optional intl) +(defun jao-x11-kb-set (lyt &optional intl) (interactive "sLayout: ") (let ((intl (if intl " -variant intl" ""))) (shell-command-to-string (format "setxkbmap %s%s" lyt intl)))) ;;;###autoload -(defun jao-kb-toggled-p () +(defun jao-x11-kb-toggled-p () (not (string-empty-p (shell-command-to-string "setxkbmap -query|grep variant")))) ;;;###autoload -(defun jao-kb-toggle () +(defun jao-x11-kb-toggle () (interactive) - (jao-kb-set (jao-kb-layout) (not (jao-kb-toggled-p)))) + (jao-x11-kb-set (jao-x11-kb-layout) (not (jao-x11-kb-toggled-p)))) ;;;###autoload -(defun jao-kb-disable-laptop () +(defun jao-x11-kb-disable-laptop () (interactive) (jao-shell-exec "xinput float 13")) -(provide 'jao-x11-kbd) +(provide 'jao-x11) ;;; jao-x11.el ends here |
