Update packages and add setup for das keyboard

It, for some reason, has different mappings for the alt keys. God
knows why.
This commit is contained in:
Maciej 2021-07-19 20:32:52 +03:00
parent e1b64159ab
commit b84a637dcf
Signed by: maciej
GPG key ID: 41D62D42D3B0D765
3 changed files with 52 additions and 40 deletions

View file

@ -29,6 +29,7 @@
"Automatically set font size to suit the monitor."
;; If display is set to emulate FullHD resultion or less, make the font
;; smaller.
(interactive)
(cond ((eq (x-display-list) nil))
;; built-in screen
@ -39,7 +40,7 @@
;; Other screens
((>= 1120 (x-display-pixel-height)) (set-font +custom-font 14))
((>= 1440 (x-display-pixel-height)) (set-font +custom-font 16))
((>= 1440 (x-display-pixel-height)) (set-font +custom-font 17))
;; 4K screen on Windows
((>= 2160 (x-display-pixel-height)) (set-font +custom-font 20))

View file

@ -49,6 +49,17 @@
;; Disable meta on right alt (useful for Polish characters)
(setq mac-right-option-modifier nil)))
(defun +custom-switch-right-left-alt ()
"Set keyboard to das keyboard."
(interactive)
(if (eq mac-right-option-modifier nil)
(progn
(setq mac-right-option-modifier 'meta)
(setq mac-option-modifier nil))
(progn
(setq mac-right-option-modifier 'meta)
(setq mac-option-modifier nil))))
;;;;;;;;; Mac-specific config ;;;;;;;;;;;;;;;;;;;;;
(if IS-GNU
(progn