From 04f3a6563a5c268d5e22a466d0b13014ed6f9a43 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Mon, 8 Jan 1996 22:41:40 +0000 Subject: [PATCH] (uniquify-rationalize-file-buffer-names): If newbuffile is nil, don't call expand-file-name on it. --- lisp/uniquify.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/uniquify.el b/lisp/uniquify.el index 495d893baf0..3bf889f0996 100644 --- a/lisp/uniquify.el +++ b/lisp/uniquify.el @@ -147,7 +147,8 @@ pathname elements. Arguments cause only a subset of buffers to be renamed." (while buffers (let* ((buffer (car buffers)) (bfn (if (eq buffer newbuf) - (expand-file-name newbuffile) + (and newbuffile + (expand-file-name newbuffile)) (uniquify-buffer-file-name buffer))) (rawname (and bfn (file-name-nondirectory bfn))) (deserving (and rawname -- 2.39.2