pestctrl/emacs-config
1
0
Fork 0
mirror of https://github.com/pestctrl/emacs-config.git synced 2026-02-16 08:14:15 +00:00
Code Issues Projects Releases Packages Wiki Activity

Work around Emacs window size being weird on VcXsrv

Browse source
This commit is contained in:
Puppet 2022-09-20 20:42:08 +03:00
parent b064911e2c
commit 1832ad1097
2 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
init.el
View file

@ -1,6 +1,3 @@
(add-to-list 'default-frame-alist '(width . 200))
(add-to-list 'default-frame-alist '(height . 60))
(setq package-list '(org use-package)) (setq package-list '(org use-package))
;; list the repositories containing them ;; list the repositories containing them
(setq package-archives '(("melpa" . "http://melpa.org/packages/") (setq package-archives '(("melpa" . "http://melpa.org/packages/")
@ -73,6 +70,10 @@
(ec/load-or-ask-pred 'my-ec/load-full-config "Do you want to load full config for emacs?") (ec/load-or-ask-pred 'my-ec/load-full-config "Do you want to load full config for emacs?")
(ec/load-or-ask-pred 'my-ec/load-org-config "Do you want to load org config?") (ec/load-or-ask-pred 'my-ec/load-org-config "Do you want to load org config?")
(when (not my-ec/is-wsl)
(add-to-list 'default-frame-alist '(width . 200))
(add-to-list 'default-frame-alist '(height . 60)))
;; It is imperative that this be loaded for a nice emacs ;; It is imperative that this be loaded for a nice emacs
;; experience. Only SUPER stable stuff goes in this file, and should ;; experience. Only SUPER stable stuff goes in this file, and should
;; rarely be modified ;; rarely be modified

2
lisp/switch-tabs.el
View file

@ -151,6 +151,8 @@
(unless (or tab-explicit-name (unless (or tab-explicit-name
(cdr (assoc 'unsplittable (cdr (assoc 'unsplittable
(frame-parameters nil)))) (frame-parameters nil))))
(when my-ec/is-wsl
(set-frame-size frame 80 30))
(tab-bar-rename-tab "scratch") (tab-bar-rename-tab "scratch")
(tab-bar-new-tab -1) (tab-bar-new-tab -1)
(tab-bar-rename-tab "emacs-devel") (tab-bar-rename-tab "emacs-devel")