diff options
Diffstat (limited to 'emacs/.emacs.d/wpc/ssh.el')
| -rw-r--r-- | emacs/.emacs.d/wpc/ssh.el | 12 |
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) |