Browse Source

fix title format

pull/1/head
10sr 11 years ago
parent
commit
0fb334e55a
1 changed files with 4 additions and 3 deletions
  1. +4
    -3
      emacs.el

+ 4
- 3
emacs.el View File

@@ -315,10 +315,11 @@ found, otherwise returns nil."
"screen")
(setq terminal-title-format
(if (getenv "SSH_CONNECTION")
'("em:"
user-login-name
`("em:"
,user-login-name
"@"
system-name
,(car (split-string system-name
"\\."))
":"
(file-name-nondirectory (directory-file-name
default-directory)))


Loading…
Cancel
Save