d1fdc9fa63
This takes care of my outstanding TODO of understanding why something ivy was
being used and other times it wasn't. It turns out that there is a generic
`completing-read` function that many Emacs packages consume. `ivy-mode` ensures
that when that function is called it is used instead of the default Emacs
completing package.
I'm still unsure of the difference between ivy and counsel. My best guess
currently is that counsel is the narrowing framework and ivy is the integration
of the narrowing framework with `completing-read`. Swiper must be the
integration with incremental {forward,backward} search.
179 lines
4.7 KiB
EmacsLisp
179 lines
4.7 KiB
EmacsLisp
;;; wpc-ui.el --- Any related to the UI/UX goes here -*- lexical-binding: t -*-
|
|
;; Author: William Carroll <wpcarro@gmail.com>
|
|
|
|
;;; Commentary:
|
|
;; Hosts font settings, scrolling, color schemes.
|
|
|
|
;;; Code:
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Dependencies
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
(require 'prelude)
|
|
(require 'alist)
|
|
(require 'themes)
|
|
(require 'device)
|
|
(require 'laptop-battery)
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Configuration
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
;; increase line height
|
|
(setq-default line-spacing 4)
|
|
|
|
;; Ensure that buffers update when their contents change on disk.
|
|
(global-auto-revert-mode t)
|
|
|
|
;; smooth scrolling settings
|
|
(setq scroll-step 1
|
|
scroll-conservatively 10000)
|
|
|
|
;; clean up modeline
|
|
(use-package diminish
|
|
:config
|
|
(diminish 'emacs-lisp-mode "elisp")
|
|
(diminish 'evil-commentary-mode)
|
|
(diminish 'flycheck-mode)
|
|
(diminish 'auto-revert-mode)
|
|
(diminish 'which-key-mode)
|
|
(diminish 'yas-minor-mode)
|
|
(diminish 'lispyville-mode)
|
|
(diminish 'undo-tree-mode)
|
|
(diminish 'company-mode)
|
|
(diminish 'projectile-mode)
|
|
(diminish 'eldoc-mode)
|
|
;; This is how to diminish `auto-fill-mode'.
|
|
(diminish 'auto-fill-function)
|
|
(diminish 'counsel-mode)
|
|
(diminish 'ivy-mode))
|
|
|
|
;; TODO: Further customize `mode-line-format' variable.
|
|
(delete 'mode-line-modes mode-line-format)
|
|
(delete '(vc-mode vc-mode) mode-line-format)
|
|
|
|
;; disable startup screen
|
|
(setq inhibit-startup-screen t)
|
|
|
|
;; disable toolbar
|
|
(tool-bar-mode -1)
|
|
|
|
;; TODO: Re-enable `linum-mode' when I figure out why the theming is so ugly.
|
|
;; enable line numbers
|
|
;; (general-add-hook '(prog-mode-hook
|
|
;; text-mode-hook
|
|
;; conf-mode-hook)
|
|
;; (enable linum-mode))
|
|
|
|
;; set default buffer for Emacs
|
|
(setq initial-buffer-choice constants/current-project)
|
|
|
|
;; TODO: Re-enable this when base16-wpgtk are looking better.
|
|
;; integration with wpgtk (in vendor directory)
|
|
;; (require 'wpgtk-theme)
|
|
|
|
;; base-16 themes to integrate with wpgtk
|
|
;; (use-package base16-theme
|
|
;; :config
|
|
;; (require 'wpgtk)
|
|
;; (colorscheme/set 'base16-wpgtk))
|
|
|
|
;; premium Emacs themes
|
|
(use-package doom-themes
|
|
:config
|
|
(setq doom-themes-enable-bold t
|
|
doom-themes-enable-italic t)
|
|
(doom-themes-visual-bell-config)
|
|
(doom-themes-org-config))
|
|
|
|
;; file browsing
|
|
(use-package neotree
|
|
:config
|
|
(global-set-key [f8] #'neotree-toggle))
|
|
|
|
;; kbd discovery
|
|
(use-package which-key
|
|
:config
|
|
(setq which-key-idle-delay 0.25)
|
|
(which-key-mode))
|
|
|
|
;; completion framework
|
|
(use-package ivy
|
|
:config
|
|
(counsel-mode t)
|
|
(ivy-mode t)
|
|
(alist/set! #'counsel-M-x "" ivy-initial-inputs-alist)
|
|
;; prefer using `helpful' variants
|
|
(progn
|
|
(setq counsel-describe-function-function #'helpful-callable)
|
|
(setq counsel-describe-variable-function #'helpful-variable))
|
|
(general-define-key
|
|
:keymaps 'ivy-minibuffer-map
|
|
;; prev
|
|
"C-k" #'ivy-previous-line
|
|
"<backtab>" #'ivy-previous-line
|
|
;; next
|
|
"C-j" #'ivy-next-line
|
|
"<tab>" #'ivy-next-line))
|
|
|
|
(use-package ivy-prescient
|
|
:config
|
|
(ivy-prescient-mode 1)
|
|
(prescient-persist-mode 1))
|
|
|
|
;; all-the-icons
|
|
(use-package all-the-icons
|
|
:config
|
|
(unless (f-exists? "~/.local/share/fonts/all-the-icons.ttf")
|
|
(all-the-icons-install-fonts)))
|
|
|
|
;; icons for Ivy
|
|
(use-package all-the-icons-ivy
|
|
:after (ivy all-the-icons)
|
|
:config
|
|
(all-the-icons-ivy-setup))
|
|
|
|
;; disable menubar
|
|
(menu-bar-mode -1)
|
|
|
|
;; reduce noisiness of auto-revert-mode
|
|
(setq auto-revert-verbose nil)
|
|
|
|
;; highlight lines that are over `constants/fill-column' characters long
|
|
(use-package whitespace
|
|
:config
|
|
;; TODO: This should change depending on the language and project. For
|
|
;; example, Google Java projects prefer 100 character width instead of 80
|
|
;; character width.
|
|
(setq whitespace-line-column constants/fill-column)
|
|
(setq whitespace-style '(face lines-tail))
|
|
(add-hook 'prog-mode-hook #'whitespace-mode))
|
|
|
|
;; dirname/filename instead of filename<dirname>
|
|
(setq uniquify-buffer-name-style 'forward)
|
|
|
|
;; highlight matching parens, brackets, etc
|
|
(show-paren-mode 1)
|
|
|
|
;; hide the scroll-bars in the GUI
|
|
(scroll-bar-mode -1)
|
|
|
|
;; TODO: Learn how to properly integrate this with dunst or another system-level
|
|
;; notification program.
|
|
;; GUI alerts in emacs
|
|
(use-package alert
|
|
:commands (alert)
|
|
:config
|
|
(setq alert-default-style 'notifier))
|
|
|
|
;; TODO: Should `device/work-laptop?' be a function or a constant that gets set
|
|
;; during initialization?
|
|
(when (device/work-laptop?)
|
|
(laptop-battery/display))
|
|
|
|
;; Load a theme
|
|
(themes/set "Solarized Light")
|
|
|
|
(provide 'wpc-ui)
|
|
;;; wpc-ui.el ends here
|