about summary refs log tree commit diff
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@tvl.su>2023-10-25T11·25+0300
committerclbot <clbot@tvl.fyi>2023-10-25T11·29+0000
commitb916c2d0b1ebf1239a1a2a54d0270f91487e5ce0 (patch)
tree25f68670a27dcad7b43491b6359092602a88a5f9
parenta89695c4c56f05451bfcd94400d99865f8de6366 (diff)
fix(tazjin/emacs): always list ttys locally r/6879
Change-Id: Ic05378013aa327616a822336881d9a76c8a22d58
Reviewed-on: https://cl.tvl.fyi/c/depot/+/9829
Autosubmit: tazjin <tazjin@tvl.su>
Reviewed-by: tazjin <tazjin@tvl.su>
Tested-by: BuildkiteCI
-rw-r--r--users/tazjin/emacs/config/look-and-feel.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/users/tazjin/emacs/config/look-and-feel.el b/users/tazjin/emacs/config/look-and-feel.el
index 467316aa8b25..d46ba974cacb 100644
--- a/users/tazjin/emacs/config/look-and-feel.el
+++ b/users/tazjin/emacs/config/look-and-feel.el
@@ -45,7 +45,8 @@
   (let ((command "who | awk '{print $2}' | grep -v tty7"))
     (-filter (lambda (s) (not (string-empty-p s)))
              (s-lines
-              (s-trim (shell-command-to-string command))))))
+              (s-trim (let ((default-directory "/"))
+                        (shell-command-to-string command)))))))
 
 (defvar cached-tty-sessions (cons (time-convert nil 'integer) (list-tty-sessions))
    "Cached TTY session value to avoid running the command too often.")