Function: uniquify-buffer-file-name

uniquify-buffer-file-name is a byte-compiled function defined in uniquify.el.gz.

Signature

(uniquify-buffer-file-name BUFFER)

Documentation

Return name of directory, file BUFFER is visiting, or nil if none.

Works on ordinary file-visiting buffers and buffers whose mode is mentioned in uniquify-list-buffers-directory-modes, otherwise returns nil.

Source Code

;; Defined in /usr/src/emacs/lisp/uniquify.el.gz
;; uniquify's version of buffer-file-name; result never contains trailing slash
(defun uniquify-buffer-file-name (buffer)
  "Return name of directory, file BUFFER is visiting, or nil if none.
Works on ordinary file-visiting buffers and buffers whose mode is mentioned
in `uniquify-list-buffers-directory-modes', otherwise returns nil."
  (with-current-buffer buffer
    (let ((filename
	   (or buffer-file-name
	       (if (memq major-mode uniquify-list-buffers-directory-modes)
		   list-buffers-directory))))
      (when filename
	 (funcall uniquify-dirname-transform
                  (directory-file-name
                  (file-name-directory
                   (expand-file-name
                    (directory-file-name filename)))))))))