Re: Question on frame title

[Random832]

Benny Sum <benny.sum@gmail.com> writes:
> Yes, it is very slow.  How do I get the value in a buffer-local
> variable?

This hasn't been tested at all, but maybe something like this:

(defvar buffer-frame-title-suffix "")
(make-variable-buffer-local 'buffer-frame-title-suffix)
(setq frame-title-format '("%b" buffer-frame-title-suffix))

(defun do-run-info_data ()
  (setq buffer-frame-title-suffix
        (if (stringp (buffer-file-name))
            (concat " "
                    (shell-command-to-string
                     (concat "info_data "
                             (shell-quote-argument (buffer-file-name)))))
            "")))

(add-hook 'find-file-hook 'do-run-info_data)

Not sure if any of this needs to change for xemacs.