2 files changed, 0 insertions, 32 deletions
diff --git a/lang/tcl84/files/patch-tclUnixChan.c b/lang/tcl84/files/patch-tclUnixChan.c
deleted file mode 100644
index 94b687f..0000000
--- a/lang/tcl84/files/patch-tclUnixChan.c
+++ /dev/null
@@ -1,12 +0,0 @@
---- tclUnixChan.c.org	Wed Feb 25 16:54:52 2004
-+++ tclUnixChan.c	Mon Jun 28 13:57:18 2004
-@@ -1787,7 +1787,8 @@
-     }
-     fd = TclOSopen(native, mode, permissions);
- #ifdef SUPPORTS_TTY
--    ctl_tty = (strcmp (native, "/dev/tty") == 0);
-+    ctl_tty = (strcmp (native, "/dev/tty") == 0) ||
-+	    (strcmp (native, "/dev/cua") == 0);
- #endif /* SUPPORTS_TTY */
- 
-     if (fd < 0) {
diff --git a/lang/tcl84/files/patch-tclUnixSock.c b/lang/tcl84/files/patch-tclUnixSock.c
deleted file mode 100644
index 1fc6882..0000000
--- a/lang/tcl84/files/patch-tclUnixSock.c
+++ /dev/null
@@ -1,20 +0,0 @@
---- tclUnixSock.c.orig	Fri Apr 16 02:48:05 1999
-+++ tclUnixSock.c	Wed Nov 14 23:21:18 2001
-@@ -65,7 +65,7 @@
- char *
- Tcl_GetHostName()
- {
--#ifndef NO_UNAME
-+#if 0
-     struct utsname u;
-     struct hostent *hp;
- #else
-@@ -80,7 +80,7 @@
-     }
- 
-     native = NULL;
--#ifndef NO_UNAME
-+#if 0
-     (VOID *) memset((VOID *) &u, (int) 0, sizeof(struct utsname));
-     if (uname(&u) > -1) {				/* INTL: Native. */
-         hp = gethostbyname(u.nodename);			/* INTL: Native. */