1 files changed, 83 insertions, 0 deletions
diff --git a/emacs/custom/fcuny-ui.el b/emacs/custom/fcuny-ui.el
new file mode 100644
index 0000000..5daef2e
--- /dev/null
+++ b/emacs/custom/fcuny-ui.el
@@ -0,0 +1,83 @@
+(use-package fringe
+  :custom
+  (left-fringe-width 5)
+  (right-fringe-width 5))
+
+(use-package scroll-bar
+  :config
+  (scroll-bar-mode -1))
+
+(use-package tool-bar
+  :config
+  (tool-bar-mode -1))
+
+(use-package menu-bar
+  :config
+  (menu-bar-mode -1))
+
+(use-package modus-themes
+  :ensure t
+  :init
+  (use-package modus-operandi-theme)
+  (use-package modus-vivendi-theme)
+  :config (load-theme 'modus-operandi t)
+  :custom
+  (modus-themes-bold-constructs t)
+  (modus-themes-fringes nil)
+  (modus-themes-slanted-constructs t)
+  (modus-themes-mode-line '3d)
+  (modus-themes-syntax nil)
+  (Modus-themes-intense-hl-line nil)
+  (modus-themes-paren-match 'intense-bold)
+  (modus-themes-links 'neutral-underline)
+  (modus-themes-prompts 'subtle)
+  (modus-themes-completions nil)
+  (modus-themes-region 'bg-only-no-extend)
+  (modus-themes-diffs 'bg-only)
+  (modus-themes-variable-pitch-headings t)
+  (modus-themes-scale-headings t)
+  (modus-themes-scale-1 1.1)
+  (modus-themes-scale-2 1.15)
+  (modus-themes-scale-3 1.21)
+  (modus-themes-scale-4 1.27)
+  (modus-themes-scale-5 1.33))
+
+(use-package diminish
+  :ensure t)
+
+(use-package frame
+  :config
+  (blink-cursor-mode -1)
+  (setq frame-title-format "%b")
+  (when (memq window-system '(mac ns))
+    (set-frame-font "Source Code Pro-14")
+    (add-to-list 'default-frame-alist '(fullscreen . maximized))
+    (add-to-list 'default-frame-alist '(ns-appearance . nil))
+    (add-to-list 'default-frame-alist '(ns-transparent-titlebar . nil))
+    (setq ns-use-native-fullscreen nil)
+    (setq mac-allow-anti-aliasing t))
+  (when (memq window-system '(x))
+    (set-frame-font "Source Code Pro-11")
+    ;; this is a fall back in the case we have unicode characeters.
+    ;; For example, with this settings, the following source is
+    ;; rendered correctly 😇 😀 and 🤢
+    (set-fontset-font "fontset-default" nil
+                      (font-spec :name "Noto Color Emoji"))))
+
+(use-package hl-line
+  :hook ((prog-mode text-mode conf-mode special-mode) . hl-line-mode)
+  :custom
+  ;; Not having to render the hl-line overlay in multiple buffers offers a tiny
+  ;; performance boost. I also don't need to see it in other buffers.
+  (hl-line-sticky-flag nil)
+  (global-hl-line-sticky-flag nil))
+
+(use-package uniquify
+  :defer 5
+  :config
+  ;; don't muck with special buffers
+  (setq uniquify-ignore-buffers-re "^\\*")
+  (setq uniquify-buffer-name-style 'forward)
+  (setq uniquify-separator "/"))
+
+(provide 'fcuny-ui)