mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-03-15 09:20:23 -07:00
Code Issues Projects Releases Packages Wiki Activity

rename-file: fix error message

Browse source 
Don't use the filename encoded in utf8/utf16/whatever in the error
message.
This commit is contained in:
Marius Gerbershagen 2022-11-19 20:38:12 +01:00
parent 220faae167
commit b9ea8ac6ac
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/unixfsys.d
View file

@ -561,7 +561,7 @@ ecl_file_len(int f)
@':supersede', /* continuable */
/* format */
ecl_make_constant_base_string(msg,strlen(msg)),
cl_list(2, oldn, new_filename), /* format args */
cl_list(2, oldn, newn), /* format args */
@':pathname', /* file-error options */
new_filename);
if (if_exists == ECL_T) if_exists= @':error';