# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 834347546 0
# Node ID 32ab7b623b9bfa2cd1554641388b65f728876f56
# Parent  104a97493dcc7a7e765eab9724e6ede2fa690212
(main): Copy cwd when appending slash.

diff -r 104a97493dcc -r 32ab7b623b9b lib-src/etags.c
--- a/lib-src/etags.c	Sun Jun 09 19:11:53 1996 +0000
+++ b/lib-src/etags.c	Sun Jun 09 19:12:26 1996 +0000
@@ -856,8 +856,8 @@
   if (tagfile == NULL)
     tagfile = CTAGS ? "tags" : "TAGS";
   cwd = etags_getcwd ();	/* the current working directory */
-  if (cwd[strlen(cwd)-1] != '/')
-    strcat (cwd, "/");
+  if (cwd[strlen (cwd) - 1] != '/')
+    cwd = concat (cwd, "/", "");
   if (streq (tagfile, "-"))
     tagfiledir = cwd;
   else