about summary refs log tree commit diff
path: root/emacs/.emacs.d/wpc/irc.el
diff options
context:
space:
mode:
authorWilliam Carroll <wpcarro@gmail.com>2020-09-01T12·44+0100
committerWilliam Carroll <wpcarro@gmail.com>2020-09-01T13·00+0100
commit718899c629bb1b8bd05285c2e8c5a1709e8e5226 (patch)
treebd360e7b7779e8d8f05df3eb1059887ede6ed8c7 /emacs/.emacs.d/wpc/irc.el
parent3b2fffe954e3927673e403ee124a78f78bb1c45c (diff)
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.
Diffstat (limited to 'emacs/.emacs.d/wpc/irc.el')
-rw-r--r--emacs/.emacs.d/wpc/irc.el8
1 files changed, 4 insertions, 4 deletions
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 <wpcarro@gmail.com>
 ;; 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)))