maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

More Elisp linting

Browse source 
This should cover most of the remaining linting errors. After this, I expect
fewer than ten linting errors.
This commit is contained in:
William Carroll 2020-09-01 10:17:43 +01:00
parent a638e15c0d
commit fb5ec068dd
47 changed files with 1049 additions and 989 deletions
Download patch file Download diff file Expand all files Collapse all files

24
emacs/.emacs.d/wpc/wpc-ui.el
View file

@ -2,8 +2,8 @@
;; Author: William Carroll <wpcarro@gmail.com>
;; Version: 0.0.1
;; URL: https://git.wpcarro.dev/wpcarro/briefcase
;; Package-Requires: ((emacs "24"))
;; Homepage: https://user.git.corp.google.com/wpcarro/briefcase
;;; Commentary:
;; Hosts font settings, scrolling, color schemes.
@ -70,7 +70,7 @@
(tool-bar-mode -1)
;; set default buffer for Emacs
(setq initial-buffer-choice constants/current-project)
(setq initial-buffer-choice constants-current-project)
;; premium Emacs themes
(use-package doom-themes
@ -91,7 +91,7 @@
:config
(counsel-mode t)
(ivy-mode t)
(alist/set! #'counsel-M-x "" ivy-initial-inputs-alist)
(alist-set! #'counsel-M-x "" ivy-initial-inputs-alist)
;; prefer using `helpful' variants
(progn
(setq counsel-describe-function-function #'helpful-callable)
@ -113,7 +113,7 @@
;; all-the-icons
(use-package all-the-icons
:config
(when (not constants/ci?)
(when (not constants-ci?)
(unless (f-exists? "~/.local/share/fonts/all-the-icons.ttf")
(all-the-icons-install-fonts t))))
@ -129,13 +129,13 @@
;; reduce noisiness of auto-revert-mode
(setq auto-revert-verbose nil)
;; highlight lines that are over `constants/fill-column' characters long
;; 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-line-column constants-fill-column)
(setq whitespace-style '(face lines-tail))
(add-hook 'prog-mode-hook #'whitespace-mode))
@ -156,15 +156,15 @@
:config
(setq alert-default-style 'notifier))
;; TODO: Should `device/work-laptop?' be a function or a constant that gets set
;; TODO: Should `device-work-laptop?' be a function or a constant that gets set
;; during initialization?
(when (device/work-laptop?)
(laptop-battery/display))
(when (device-work-laptop?)
(laptop-battery-display))
(fonts/whitelist-set "JetBrainsMono")
(colorscheme/whitelist-set 'doom-solarized-light)
(fonts-whitelist-set "JetBrainsMono")
(colorscheme-whitelist-set 'doom-solarized-light)
(modeline/setup)
(modeline-setup)
(provide 'wpc-ui)
;;; wpc-ui.el ends here