From 718899c629bb1b8bd05285c2e8c5a1709e8e5226 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Tue, 1 Sep 2020 13:44:18 +0100 Subject: More Elisp linting In order for this to scale, I need to solve two things: 1. Ad-hoc ignore fill-column rules for URLs and other exceptions. 2. Run Elisp flychecker without evaluating my Elisp code and firing its side-effects. --- emacs/.emacs.d/wpc/irc.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'emacs/.emacs.d/wpc/irc.el') diff --git a/emacs/.emacs.d/wpc/irc.el b/emacs/.emacs.d/wpc/irc.el index 7247e818c5e0..46a0fa73af60 100644 --- a/emacs/.emacs.d/wpc/irc.el +++ b/emacs/.emacs.d/wpc/irc.el @@ -3,7 +3,7 @@ ;; Author: William Carroll ;; Version: 0.0.1 ;; URL: https://git.wpcarro.dev/wpcarro/briefcase -;; Package-Requires: ((emacs "24")) +;; Package-Requires: ((emacs "25.1")) ;;; Commentary: ;; Need to decide which client I will use for IRC. @@ -60,14 +60,14 @@ irc-server->channels))))) (defun irc-channel->server (server->channels channel) - "Resolve an IRC server from a given CHANNEL." + "Using SERVER->CHANNELS, resolve an IRC server from a given CHANNEL." (let ((result (alist-find (lambda (k v) (cycle-contains? channel v)) server->channels))) (prelude-assert (maybe-some? result)) result)) (defun irc-channel->cycle (server->channels channel) - "Resolve an IRC's channels cycle from a given CHANNEL." + "Using SERVER->CHANNELS, resolve an IRC's channels cycle from CHANNEL." (alist-get (irc-channel->server server->channels channel) server->channels)) @@ -98,7 +98,7 @@ ;; TODO: Support function or KBD for switching to an ERC buffer. (defun irc-kill-all-erc-processes () - "Kills all ERC buffers and processes." + "Kill all ERC buffers and processes." (interactive) (->> (erc-buffer-list) (-map #'kill-buffer))) -- cgit 1.4.1