More Elisp linting

This should cover most of the remaining linting errors. After this, I expect
fewer than ten linting errors.

1 files changed, 6 insertions, 6 deletions

diff --git a/emacs/.emacs.d/wpc/ssh.el b/emacs/.emacs.d/wpc/ssh.el
index 4176872847dc..a642e6fa3e57 100644
--- a/emacs/.emacs.d/wpc/ssh.el
+++ b/emacs/.emacs.d/wpc/ssh.el
@@ -37,23 +37,23 @@
 ;; Maximizes the tramp debugging noisiness while I'm still learning about tramp.
 (setq tramp-verbose 10)
 
-(defcustom ssh/hosts '("desktop" "socrates")
+(defcustom ssh-hosts '("desktop" "socrates")
   "List of hosts to which I commonly connect.
-Note: It could be interesting to read these values from ~/.ssh/config, but
+Note: It could be interesting to read these values from ~/.ssh-config, but
   that's more than I need at the moment.")
 
-(defun ssh/sudo-buffer ()
+(defun ssh-sudo-buffer ()
   "Open the current buffer with sudo rights."
   (interactive)
   (with-current-buffer (current-buffer)
     (if (s-starts-with? "/ssh:" buffer-file-name)
-        (message "[ssh.el] calling ssh/sudo-buffer for remote files isn't currently supported")
+        (message "[ssh.el] calling ssh-sudo-buffer for remote files isn't currently supported")
       (find-file (format "/sudo::%s" buffer-file-name)))))
 
-(defun ssh/cd-home ()
+(defun ssh-cd-home ()
   "Prompt for an SSH host and open a dired buffer for wpcarro on that machine."
   (interactive)
-  (let ((machine (completing-read "Machine: " ssh/hosts)))
+  (let ((machine (completing-read "Machine: " ssh-hosts)))
     (find-file (format "/ssh:wpcarro@%s:~" machine))))
 
 (provide 'ssh)