Graphical breadcrumb for Emacs

Question

Anyone know of any graphical breadcrumbs for Emacs? I would like to have the path to the file I am currently editing displayed on top somewhere.

Answer 1

How about this:

(defun my-breadcrumb (path)
  "Return path in a breadcrumb format."
  (mapconcat 'identity
             (split-string path (char-to-string directory-sep-char) t)
             " > "))

(setq frame-title-format
      '(buffer-file-name
        (:eval (my-breadcrumb buffer-file-name))
        (dired-directory
         (:eval (my-breadcrumb dired-directory))
         ("%b"))))