Add RBS mode

This commit is contained in:
Maciej 2022-03-25 13:06:25 +02:00
parent 32f0c52a0c
commit c556cdee38
Signed by: maciej
GPG key ID: 41D62D42D3B0D765
6 changed files with 44 additions and 39 deletions

View file

@ -58,19 +58,19 @@
(cond ((eq (x-display-list) nil))
;; built-in screen
((>= 1050 (x-display-pixel-height)) (set-font +custom-font 14))
((>= 1050 (x-display-pixel-height)) (set-font +custom-font +custom-font-size))
;; 4K screen on a Mac
((>= 1080 (x-display-pixel-height)) (set-font +custom-font 14))
((>= 1080 (x-display-pixel-height)) (set-font +custom-font +custom-font-size))
;; Other screens
((>= 1120 (x-display-pixel-height)) (set-font +custom-font 14))
((>= 1440 (x-display-pixel-height)) (set-font +custom-font 17))
((>= 1920 (x-display-pixel-height)) (set-font +custom-font 14))
((>= 1120 (x-display-pixel-height)) (set-font +custom-font +custom-font-size))
((>= 1440 (x-display-pixel-height)) (set-font +custom-font (+ +custom-font-size 3)))
((>= 1920 (x-display-pixel-height)) (set-font +custom-font +custom-font-size))
;; 4K screen on Windows
((>= 2160 (x-display-pixel-height)) (set-font +custom-font 20))
(t (set-font +custom-font 16))))
((>= 2160 (x-display-pixel-height)) (set-font +custom-font (+ +custom-font-size 6)))
(t (set-font +custom-font (+ +custom-font-size 2)))))
;; Do it automatically on startup
(set-font-to-screen)

View file

@ -104,7 +104,7 @@
^ Buffer Other
^
^ _r_: Reload _m_: iMenu
^ _f_: Format
^ _f_: Format _e_: Show Errors
^ _i_: Indent
^
"
@ -114,7 +114,8 @@
("i" mark-and-indent-whole-buffer)
("f" lsp-format-buffer)
("m" lsp-ui-imenu))
("m" lsp-ui-imenu)
("e" flycheck-list-errors))
(defhydra +hydra-history-menu (:color teal :hint nil)
"

View file

@ -37,6 +37,7 @@
:hook (((prog-mode text-mode) . rainbow-delimiters-mode))
:init
;;; Match parenthasis (left-right)
(electric-pair-mode t)
(show-paren-mode t))