summaryrefslogtreecommitdiff
path: root/terminal-here.el
diff options
context:
space:
mode:
Diffstat (limited to 'terminal-here.el')
-rw-r--r--terminal-here.el14
1 files changed, 13 insertions, 1 deletions
diff --git a/terminal-here.el b/terminal-here.el
index e504a54..b8b7526 100644
--- a/terminal-here.el
+++ b/terminal-here.el
@@ -237,7 +237,19 @@ changed it by running `cd'."
(list (if current-prefix-arg (read-directory-name "Directory: ")
default-directory)))
(when multiplexer (terminal-here-not-null-symbol terminal-here-multiplexer))
- (terminal-here-launch-in-directory directory multiplexer))
+ (if (and (string-prefix-p "/ssh:" directory)
+ (s-contains? "|" directory))
+ (let ((ssh+sudo (split-string directory "|")))
+ (terminal-here-launch-in-directory
+ (mapconcat 'identity (list "/ssh:"
+ (cadr (split-string (car ssh+sudo) ":"))
+ ":/home/sup")
+ "")
+ multiplexer)
+ (start-process "xdotool" nil (expand-file-name "~/bin/sudo-to-user-web")
+ (car (split-string (nth 1 (split-string (cadr ssh+sudo) ":"))
+ "@"))))
+ (terminal-here-launch-in-directory directory multiplexer)))
;;;###autoload
(defalias 'terminal-here 'terminal-here-launch)