Function: uniquify--rename-buffer-advice

uniquify--rename-buffer-advice is a byte-compiled function defined in uniquify.el.gz.

Signature

(uniquify--rename-buffer-advice RB-FUN NEWNAME &optional UNIQUE &rest ARGS)

Documentation

Uniquify buffer names with parts of directory name.

Source Code

;; Defined in /usr/src/emacs/lisp/uniquify.el.gz
(defun uniquify--rename-buffer-advice (rb-fun newname &optional unique &rest args)
  "Uniquify buffer names with parts of directory name."
  (let ((retval (apply rb-fun newname unique args)))
  (uniquify-maybe-rerationalize-w/o-cb)
    (if (null unique)
      ;; Mark this buffer so it won't be renamed by uniquify.
      (setq uniquify-managed nil)
    (when uniquify-buffer-name-style
      ;; Rerationalize w.r.t the new name.
      (uniquify-rationalize-file-buffer-names
         newname
       (uniquify-buffer-file-name (current-buffer))
       (current-buffer))
        (setq retval (buffer-name (current-buffer)))))
    retval))