dotfiles-misc/protesilaos.dotfiles
1
0
Fork 0
mirror of https://github.com/protesilaos/dotfiles.git synced 2026-09-10 07:16:20 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

emacs: tweak the laptop-specific frame settings

Browse source
This commit is contained in:
Protesilaos Stavrou 2025-07-13 06:15:05 +03:00
parent 1bc0374d55
commit 622446d9c0
No known key found for this signature in database
GPG key ID: 99BD6459CD5CA3EA
2 changed files with 14 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
emacs/.emacs.d/prot-emacs-modules/prot-emacs-essentials.el
View file

@ -555,12 +555,15 @@ word. Fall back to regular `expreg-expand'."
"When non-nil, we assume to be working on a laptop.")
(when prot-laptop-p
(add-to-list 'default-frame-alist '(width . (text-pixels . 800)))
(add-to-list 'default-frame-alist '(height . (text-pixels . 600)))
(defun prot-emacs-maximize-frame (frame)
"Maximise the given FRAME."
(set-frame-parameter frame 'fullscreen 'maximized))
(toggle-frame-maximized)
(prot-emacs-maximize-frame (selected-frame))
(add-hook 'after-make-frame-functions (lambda (frame) (toggle-frame-maximized frame))))
(add-hook 'after-make-frame-functions #'prot-emacs-maximize-frame)
(add-hook 'window-size-change-functions #'frame-hide-title-bar-when-maximized))
(use-package battery
:ensure nil

11
emacs/.emacs.d/prot-emacs.org
View file

@ -3684,12 +3684,15 @@ line.
"When non-nil, we assume to be working on a laptop.")
(when prot-laptop-p
(add-to-list 'default-frame-alist '(width . (text-pixels . 800)))
(add-to-list 'default-frame-alist '(height . (text-pixels . 600)))
(defun prot-emacs-maximize-frame (frame)
"Maximise the given FRAME."
(set-frame-parameter frame 'fullscreen 'maximized))
(toggle-frame-maximized)
(prot-emacs-maximize-frame (selected-frame))
(add-hook 'after-make-frame-functions (lambda (frame) (toggle-frame-maximized frame))))
(add-hook 'after-make-frame-functions #'prot-emacs-maximize-frame)
(add-hook 'window-size-change-functions #'frame-hide-title-bar-when-maximized))
(use-package battery
:ensure nil