masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-04 19:29:37 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

; Improve documentation of 'file-name-with-extension'

Browse source 
* lisp/files.el (file-name-with-extension): Doc fix.  (Bug#56809)
This commit is contained in:
Eli Zaretskii 2022-07-28 10:45:43 +03:00
parent 4be938169d
commit 23112f89f9
1 changed files with 7 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lisp/files.el
View file

@ -5033,14 +5033,16 @@ extension, the value is \"\"."
""))))) "")))))
(defun file-name-with-extension (filename extension) (defun file-name-with-extension (filename extension)
"Set the EXTENSION of a FILENAME. "Return FILENAME modified to have the specified EXTENSION.
The extension (in a file name) is the part that begins with the last \".\". The extension (in a file name) is the part that begins with the last \".\".
This function removes any existing extension from FILENAME, and then
appends EXTENSION to it.
Trims a leading dot from the EXTENSION so that either \"foo\" or EXTENSION may include the leading dot; if it doesn't, this function
\".foo\" can be given. will provide it.
Errors if the FILENAME or EXTENSION are empty, or if the given It is an error if FILENAME or EXTENSION is empty, or if FILENAME
FILENAME has the format of a directory. is in the form of a directory name according to `directory-name-p'.
See also `file-name-sans-extension'." See also `file-name-sans-extension'."
(let ((extn (string-trim-left extension "[.]"))) (let ((extn (string-trim-left extension "[.]")))