diff options
author | Colin Woodbury <colin@fosskers.ca> | 2021-08-22 16:27:12 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-08-22 16:27:12 +0200 |
commit | 16bb524a5e2e2b8ddd3bd705972b9f7502f7f1ab (patch) | |
tree | 60e30b8ff5a09482382d43d06d62178061386f69 /lisp/files.el | |
parent | 5b55659baebd314a00e0219e65e356a9acdbc40a (diff) |
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).
Diffstat (limited to 'lisp/files.el')
-rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
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) |