From a679ab2be74ee228238ab741299e9fb8cd251026 Mon Sep 17 00:00:00 2001 From: Dirk Meyer Date: Thu, 10 May 2001 20:13:56 +0000 Subject: - Fix creation of tmpfiles, previous version cause tcl to fail. PR: roam@FreeBSD.org Submitted by: Jaeho Kang , roam@FreeBSD.org --- lang/tcl83/Makefile | 2 +- lang/tcl83/files/patch-tmpnam | 10 ++++------ 2 files changed, 5 insertions(+), 7 deletions(-) (limited to 'lang/tcl83') diff --git a/lang/tcl83/Makefile b/lang/tcl83/Makefile index 9d4b733635ff..3e2e705f49e4 100644 --- a/lang/tcl83/Makefile +++ b/lang/tcl83/Makefile @@ -7,7 +7,7 @@ PORTNAME= tcl PORTVERSION= 8.3.3 -PORTREVISION= 1 +PORTREVISION= 2 CATEGORIES= lang tcl83 MASTER_SITES= ${MASTER_SITE_TCLTK} MASTER_SITE_SUBDIR= tcl8_3 diff --git a/lang/tcl83/files/patch-tmpnam b/lang/tcl83/files/patch-tmpnam index ef535617fe5d..535259b7af2c 100644 --- a/lang/tcl83/files/patch-tmpnam +++ b/lang/tcl83/files/patch-tmpnam @@ -1,8 +1,6 @@ ---- tclUnixPipe.c Tue Apr 3 18:54:39 2001 -+++ tclUnixPipe.c Sat Apr 28 12:41:46 2001 -@@ -193,13 +193,10 @@ - /* - * Linux says we should use mkstemp, but Solaris prefers tmpnam. +--- tclUnixPipe.c.orig Wed Apr 4 00:54:39 2001 ++++ tclUnixPipe.c Thu May 10 22:00:30 2001 +@@ -195,10 +195,8 @@ * We should also check against making more then TMP_MAX of these. */ @@ -10,8 +8,8 @@ - return NULL; - } - fd = open(fileName, O_RDWR|O_CREAT|O_EXCL, 0666); /* INTL: Native. */ ++ strlcpy(fileName, "/var/tmp/tcltmp.XXXXXX", L_tmpnam); + fd = mkstemp(fileName); /* INTL: Native. */ if (fd == -1) { return NULL; } - fcntl(fd, F_SETFD, FD_CLOEXEC); -- cgit v1.2.3