jimeh/.emacs.d
1
0
Fork 0
mirror of https://github.com/jimeh/.emacs.d.git synced 2026-02-19 13:46:41 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat(workspaces): strip down frame parameters saved to desktop file

Browse Source 
Most visual/theme related frame parameters I prefer coming from the
active config, rather than being restored to what they were when the
desktop/session file was saved.
This commit is contained in:
Jim Myhrberg
2020-08-27 23:46:00 +01:00
parent 1c81570ef7
commit 7a1ab57606
1 changed files with 26 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
modules/workspaces/siren-desktop.el
View File

@@ -24,11 +24,36 @@
:config
(add-to-list 'desktop-clear-preserve-buffers "\\*Async-native-compile-log\\*")
(push '(alpha . :never) frameset-filter-alist)
(push '(background-color . :never) frameset-filter-alist)
(push '(background-mode . :never) frameset-filter-alist)
(push '(border-width . :never) frameset-filter-alist)
(push '(bottom-divider-width . :never) frameset-filter-alist)
(push '(cursor-color . :never) frameset-filter-alist)
(push '(cursor-type . :never) frameset-filter-alist)
(push '(display-type . :never) frameset-filter-alist)
(push '(environment . :never) frameset-filter-alist)
(push '(font . :never) frameset-filter-alist)
(push '(fontsize . :never) frameset-filter-alist)
(push '(foreground-color . :never) frameset-filter-alist)
(push '(fullscreen . :never) frameset-filter-alist)
(push '(fullscreen-restore . :never) frameset-filter-alist)
(push '(alpha . :never) frameset-filter-alist)
(push '(horizontal-scroll-bars . :never) frameset-filter-alist)
(push '(internal-border-width . :never) frameset-filter-alist)
(push '(left-fringe . :never) frameset-filter-alist)
(push '(line-spacing . :never) frameset-filter-alist)
(push '(menu-bar-lines . :never) frameset-filter-alist)
(push '(ns-appearance . :never) frameset-filter-alist)
(push '(ns-transparent-titlebar . :never) frameset-filter-alist)
(push '(powerline-cache . :never) frameset-filter-alist)
(push '(right-divider-width . :never) frameset-filter-alist)
(push '(right-fringe . :never) frameset-filter-alist)
(push '(scroll-bar-height . :never) frameset-filter-alist)
(push '(scroll-bar-width . :never) frameset-filter-alist)
(push '(tab-bar-lines . :never) frameset-filter-alist)
(push '(tool-bar-lines . :never) frameset-filter-alist)
(push '(tool-bar-position . :never) frameset-filter-alist)
(push '(vertical-scroll-bars . :never) frameset-filter-alist)
:init
(defun siren-desktop-setup ()