(directory_file_name): Don't clobber the envvar

when handling top-level rooted dir.

(directory_file_name): Don't clobber the envvar
when handling top-level rooted dir.
72b21817 · Richard M. Stallman · eabf7f96 · 72b21817
Commit 72b21817 authored Oct 06, 1992 by Richard M. Stallman
Show whitespace changes
Inline Side-by-side

Showing with 5 additions and 3 deletions

src/fileio.c src/fileio.c +5 -3

No files found.
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -468,9 +468,11 @@ directory_file_name (src, dst)
 		  && (ptr[rlen] == ']' || ptr[rlen] == '>')
 		  && ptr[rlen - 1] == '.')
 		{
-		  ptr[rlen - 1] = ']';
-		  ptr[rlen] = '\0';
-		  return directory_file_name (ptr, dst);
+		  char * buf = (char *) alloca (strlen (ptr) + 1);
+		  strcpy (buf, ptr);
+		  buf[rlen - 1] = ']';
+		  buf[rlen] = '\0';
+		  return directory_file_name (buf, dst);
 		}
 	      else
 		dst[slen - 1] = ':';