From e1a44f5d34dae121fc0afd5865d0333b1a818e37 Mon Sep 17 00:00:00 2001 From: David Florness Date: Sat, 30 May 2020 18:32:41 -0600 Subject: [PATCH] Cleanup appearence setup file --- lisp/appearance.el | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) diff --git a/lisp/appearance.el b/lisp/appearance.el index 38f459f..63c8c16 100644 --- a/lisp/appearance.el +++ b/lisp/appearance.el @@ -1,7 +1,6 @@ ;;; Change frame title (setq frame-title-format "emacs") - ;;; Font (ignore-errors (set-frame-font @@ -12,11 +11,9 @@ :width 'normal) nil t)) - (set-language-environment "UTF-8") (prefer-coding-system 'utf-8) - (menu-bar-mode 0) ; Disable menu bar (scroll-bar-mode 0) ; Disable scroll bar (tool-bar-mode 0) ; Disable tool bar @@ -27,17 +24,14 @@ (global-hi-lock-mode 1) ; Highlight stuff with M-s h (mouse-avoidance-mode 'none) ; Move mouse if it gets in the way of the cursor - ;;; Spell check in comments and strings (flyspell-prog-mode) - ;;; Setup theme (use-package gruvbox-theme :defer t) (load-theme 'gruvbox-dark-hard t) - ;;; Transparency control (defvar new-frames-are-transparent t "Whether new frames should be transparent") @@ -55,14 +49,13 @@ '(nil 100)) 80 100)))) -(global-set-key (kbd "C-c t") 'toggle-transparency) +(global-set-key (kbd "C-c t") #'toggle-transparency) (add-to-list 'after-make-frame-functions (lambda (frame) (if new-frames-are-transparent (set-frame-parameter frame 'alpha 80)))) - ;;; display ugly ^L page breaks as tidy horizontal lines (use-package page-break-lines :config -- 2.38.4