Retitle emacs window to current directory path