From 51d3f0854e89fd9002c6f1732a42ab99013d97fd Mon Sep 17 00:00:00 2001
From: Jakub Jelinek <jakub@redhat.com>
Date: Mon, 5 Nov 2001 16:20:37 +0000
Subject: 	* arlex.l: Accept `\' in filenames.  Patch by
 <earl_chew@agilent.com>.

	* arsup.c (ar_open): Prepend tmp- to basename, not whole path.
---
 binutils/arsup.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'binutils/arsup.c')

diff --git a/binutils/arsup.c b/binutils/arsup.c
index 0058c0d31f..1e86479395 100644
--- a/binutils/arsup.c
+++ b/binutils/arsup.c
@@ -160,10 +160,11 @@ DEFUN(ar_open,(name, t),
 
 {
   char *tname = (char *) xmalloc (strlen (name) + 10);
+  const char *bname = lbasename (name);
   real_name = name;
   /* Prepend tmp- to the beginning, to avoid file-name clashes after
      truncation on filesystems with limited namespaces (DOS).  */
-  sprintf(tname, "tmp-%s", name);
+  sprintf(tname, "%.*stmp-%s", (int) (bname - name), name, bname);
   obfd = bfd_openw(tname, NULL);
 
   if (!obfd) {
-- 
cgit v1.2.1