about summary refs log tree commit diff
path: root/tools/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'tools/emacs')
-rw-r--r--tools/emacs/config/desktop.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/tools/emacs/config/desktop.el b/tools/emacs/config/desktop.el
index a19b3f6745f4..84bc60d37712 100644
--- a/tools/emacs/config/desktop.el
+++ b/tools/emacs/config/desktop.el
@@ -46,7 +46,7 @@
               ,(-map (lambda (n) (list n secondary)) (number-sequence 8 9)))))
 
 (defun randr-layout-dp1-extend ()
-  "Layout for connecting my X1 Carbon to my screen at home"
+  "Layout for connecting my X1 Carbon to my screen at home."
 
   (interactive)
   (setq exwm-randr-workspace-monitor-plist (generate-randr-config "DP1-1" "eDP1"))
@@ -59,7 +59,8 @@
   (interactive)
   (setq exwm-randr-workspace-monitor-plist (generate-randr-config "HDMI1" "eDP1"))
   (exwm-randr-refresh)
-  (shell-command "xrandr --output HDMI1 --dpi 144 --auto --right-of eDP1 --primary"))
+  (shell-command "xrandr --output HDMI1 --dpi 144 --auto --right-of eDP1 --primary")
+  (set-default-text-scale nil 165))
 
 (defun randr-layout-single ()
   "Laptop screen only!"
@@ -67,7 +68,8 @@
   (interactive)
   (shell-command "xrandr --output HDMI1 --off")
   (shell-command "xrandr --output DP1-1 --off")
-  (exwm-randr-refresh))
+  (exwm-randr-refresh)
+  (restore-default-text-scale))
 
 (defun set-xkb-layout (layout)
   "Set the current X keyboard layout."