Browse Source

Add transparency and border; modified garbage collection

master
macoymadson@gmail.com 3 years ago
parent
commit
0f725fcf94
  1. 16
      Emacs/core-settings.el
  2. 10
      Emacs/visual-late.el

16
Emacs/core-settings.el

@ -33,7 +33,21 @@
(save-place-mode 1)
;; Make garbage collection happen less often (https://github.com/lewang/flx)
(setq gc-cons-threshold 20000000)
;; (setq gc-cons-threshold 20000000)
;; Another idea:
;; http://bling.github.io/blog/2016/01/18/why-are-you-changing-gc-cons-threshold/
;; These are tricky: the higher, the more responsive flx ido is, but the slower it takes on minibuffer exit
(defun my-minibuffer-setup-hook ()
;; (setq gc-cons-threshold most-positive-fixnum))
;; (setq gc-cons-threshold 20000000))
(setq gc-cons-threshold 80000000))
(defun my-minibuffer-exit-hook ()
(setq gc-cons-threshold 800000))
(add-hook 'minibuffer-setup-hook #'my-minibuffer-setup-hook)
(add-hook 'minibuffer-exit-hook #'my-minibuffer-exit-hook)
;; stop creating those backup~ files
(setq make-backup-files nil)

10
Emacs/visual-late.el

@ -5,6 +5,16 @@
;; These give emacs a more minimal, less contrast-y appearance
;; I put it down here so it happens after custom-set-variables sets the theme
;; Whole-window transparency
;; The first number is transparency while active
;; The second number is transparency while inactive
(set-frame-parameter (selected-frame) 'alpha '(82 70))
;; Add a slight border to give us some breathing room on the edges
(set-frame-parameter (selected-frame) 'internal-border-width 5)
;; Uncomment to disable the edge border
;; (set-frame-parameter (selected-frame) 'internal-border-width 0)
;; Set the border color to the fringe to have less contrast-y line (generally; will vary per theme)
;; Commented versions are for when base16-distinct-fringe-background wasn't nil
;; (set-face-background 'vertical-border (face-background 'fringe))

Loading…
Cancel
Save