Include username, host and modified status in frame title.

setup-emacs.org

@@ -695,12 +695,10 @@ This is my configuration for the emacs editor.
 
 ** Show the current filename in titlebar
    #+BEGIN_SRC emacs-lisp
-     (setq-default frame-title-format
+     (setq frame-title-format
-                   (list '((buffer-file-name " %f"
+           '((:eval user-login-name) "@" (:eval (system-name)) ": " (:eval (if (buffer-file-name)
-                                             (dired-directory
+                                                                                (abbreviate-file-name (buffer-file-name))
-                                              dired-directory
+                                                                              "%b")) " [%*]"))
-                                              (revert-buffer-function " %b"
-                                                                      ("%b - Dir:  " default-directory)))))))
    #+END_SRC
 
 ** Default encoding