From fb5ec068ddd50f6bce41c7a0bad45673db787940 Mon Sep 17 00:00:00 2001
From: William Carroll <wpcarro@gmail.com>
Date: Tue, 1 Sep 2020 10:17:43 +0100
Subject: More Elisp linting

This should cover most of the remaining linting errors. After this, I expect
fewer than ten linting errors.
---
 emacs/.emacs.d/wpc/wpc-ui.el | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

(limited to 'emacs/.emacs.d/wpc/wpc-ui.el')

diff --git a/emacs/.emacs.d/wpc/wpc-ui.el b/emacs/.emacs.d/wpc/wpc-ui.el
index ca17486616da..31b9c5f7e656 100644
--- a/emacs/.emacs.d/wpc/wpc-ui.el
+++ b/emacs/.emacs.d/wpc/wpc-ui.el
@@ -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
-- 
cgit 1.4.1