procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Fdirectory_files): Use make_uninit_multibyte_string.

Browse source 
Use STRING_BYTES on encoded_directory.
This commit is contained in:
Karl Heuer 1998-04-06 21:52:29 +00:00
parent 2ca250f9be
commit e540cbed19
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/dired.c
View file

@ -183,7 +183,7 @@ If NOSORT is non-nil, the list is not sorted--its order is unpredictable.\n\
report_file_error ("Opening directory", Fcons (directory, Qnil));
list = Qnil;
dirnamelen = XSTRING (encoded_directory)->size;
dirnamelen = STRING_BYTES (XSTRING (encoded_directory));
re_match_object = Qt;
/* Decide whether we need to add a directory separator. */
@ -191,7 +191,7 @@ If NOSORT is non-nil, the list is not sorted--its order is unpredictable.\n\
if (dirnamelen == 0
|| !IS_ANY_SEP (XSTRING (encoded_directory)->data[dirnamelen - 1]))
needsep = 1;
#endif /* VMS */
#endif /* not VMS */
GCPRO2 (encoded_directory, list);
@ -214,7 +214,8 @@ If NOSORT is non-nil, the list is not sorted--its order is unpredictable.\n\
int total = len + dirnamelen;
int nchars;
name = make_uninit_string (total + needsep);
name = make_uninit_multibyte_string (total + needsep,
total + needsep);
bcopy (XSTRING (encoded_directory)->data, XSTRING (name)->data,
dirnamelen);
if (needsep)