From: Colin Woodbury <colin@fosskers.ca>
Date: Sun, 22 Aug 2021 14:27:12 +0000 (+0200)
Subject: Don't echo empty string in file-name-with-extension
X-Git-Tag: emacs-28.0.90~1360
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=16bb524a5e2e2b8ddd3bd705972b9f7502f7f1ab;p=emacs.git

Don't echo empty string in file-name-with-extension

* lisp/files.el (file-name-with-extension): Avoid echoing a filename
string known to be empty (bug#50149).
---

diff --git a/lisp/files.el b/lisp/files.el
index f0baa4fac6d..ba362827ee7 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5033,7 +5033,7 @@ FILENAME has the format of a directory.
 See also `file-name-sans-extension'."
   (let ((extn (string-trim-left extension "[.]")))
     (cond ((string-empty-p filename)
-           (error "Empty filename: %s" filename))
+           (error "Empty filename"))
           ((string-empty-p extn)
            (error "Malformed extension: %s" extension))
           ((directory-name-p filename)