# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 890504589 0
# Node ID edaef0e79ff01883e99a33e9cae34c7e7b43fa2a
# Parent  4ac9ba6e745d36013de54c7cf293e99c66c81650
(Fdirectory_files): In FULL case, compute number of characters

diff -r 4ac9ba6e745d -r edaef0e79ff0 src/dired.c
--- a/src/dired.c	Sat Mar 21 18:09:01 1998 +0000
+++ b/src/dired.c	Sat Mar 21 18:23:09 1998 +0000
@@ -206,6 +206,7 @@
 		  int afterdirindex = dirnamelen;
 		  int total = len + dirnamelen;
 		  int needsep = 0;
+		  int nchars;
 
 		  /* Decide whether we need to add a directory separator.  */
 #ifndef VMS
@@ -221,6 +222,11 @@
 		    XSTRING (name)->data[afterdirindex++] = DIRECTORY_SEP;
 		  bcopy (dp->d_name,
 			 XSTRING (name)->data + afterdirindex, len);
+		  nchars = chars_in_text (dp->d_name,
+					  afterdirindex + len);
+		  XSTRING (name)->size = nchars;
+		  if (nchars == STRING_BYTES (XSTRING (name)))
+		    SET_STRING_BYTES (XSTRING (name), -1);
 		}
 	      else
 		name = make_string (dp->d_name, len);