Alpha = 96 & cleanup

init/core-ui.el

@@ -4,7 +4,7 @@
 ;;;; Load Theme ;;;;;;;;;;;;;;;;;;;;;;;;
 (when window-system
   ;; No transparency!
-  (set-frame-parameter nil 'alpha 100)
+  (set-frame-parameter nil 'alpha 96)
 
   (unless (member *default-font (font-family-list))
     (error "Font %s isn't installed" *default-font))

init/core.el

@@ -232,7 +232,6 @@ the checking happens for all pairs in auto-minor-mode-alist"
       ;; Hook up smex to auto-update, rather than update on every run
       (defun smex-update-after-load (unused)
         (when (boundp 'smex-cache) (smex-update)))
-
       (add-hook 'after-load-functions 'smex-update-after-load)))
 
   (use-package popwin
@@ -259,10 +258,6 @@ the checking happens for all pairs in auto-minor-mode-alist"
             (popwin:close-popup-window)
           (popwin:popup-last-buffer)))))
 
-  ;; (require 'key-chord)
-  ;; (key-chord-mode 1)
-  ;; (setq key-chord-two-keys-delay 0.2)
-
 
   ;;;; Start the party ;;;;;;;;;;;;;;;;;;;
   (if is-mac (require 'core-osx))

init/defuns-ui.el

@@ -27,8 +27,8 @@
 ;;;###autoload
 (defun toggle-transparency ()
   (interactive)
-  (if (/= (frame-parameter nil 'alpha) 100)
-      (set-frame-parameter nil 'alpha 100)
+  (if (/= (frame-parameter nil 'alpha) 96)
+      (set-frame-parameter nil 'alpha 96)
     (set-frame-parameter nil 'alpha 0)))
 
 ;;;###autoload

init/my-settings.el

@@ -92,7 +92,6 @@
             minibuffer-local-must-match-map
             minibuffer-local-isearch-map) [escape] 'my--minibuffer-quit)
 (bind 'emacs [escape] 'my--minibuffer-quit)
-
 (bind 'god [escape] 'evil-god-state-bail)
 (bind 'normal evil-command-window-mode-map [escape] 'kill-buffer-and-window)
 (bind evil-ex-map [escape] 'my--minibuffer-quit)
@@ -120,7 +119,6 @@
         ((string-match "^ \\*" (buffer-name (current-buffer)))
          (bury-buffer))))
 
-
 (defun my-emacs-is-not-kill ()
   (interactive)
   (message "Gee, I dunno Brain..."))