diff --git a/init.el b/init.el index 2d7df46..8bd1c8c 100644 --- a/init.el +++ b/init.el @@ -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)) ;; list the repositories containing them (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-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 ;; experience. Only SUPER stable stuff goes in this file, and should ;; rarely be modified diff --git a/lisp/switch-tabs.el b/lisp/switch-tabs.el index ef7d1ad..7708749 100644 --- a/lisp/switch-tabs.el +++ b/lisp/switch-tabs.el @@ -151,6 +151,8 @@ (unless (or tab-explicit-name (cdr (assoc 'unsplittable (frame-parameters nil)))) + (when my-ec/is-wsl + (set-frame-size frame 80 30)) (tab-bar-rename-tab "scratch") (tab-bar-new-tab -1) (tab-bar-rename-tab "emacs-devel")