diff --git a/tcsh-6.15.00-closem.patch b/tcsh-6.15.00-closem.patch
new file mode 100644
index 0000000..b1fa58c
--- /dev/null
+++ b/tcsh-6.15.00-closem.patch
@@ -0,0 +1,27 @@
+--- tcsh-6.15.00/sh.misc.c_old	2006-10-14 19:57:21.000000000 +0200
++++ tcsh-6.15.00/sh.misc.c	2007-08-27 15:55:20.000000000 +0200
+@@ -255,6 +255,7 @@
+ closem(void)
+ {
+     int f, num_files;
++    struct stat st;
+ 
+ #ifdef NLS_BUGS
+ #ifdef NLS_CATALOGS
+@@ -272,6 +273,16 @@
+ #ifdef MALLOC_TRACE
+ 	    && f != 25
+ #endif /* MALLOC_TRACE */
++#ifdef S_ISSOCK
++           /* NSS modules (e.g. Linux nss_ldap) might keep sockets open.
++            * If we close such a socket, both the NSS module and tcsh think
++            * they "own" the descriptor.
++            *
++            * Not closing sockets does not make the cleanup use of closem()
++            * less reliable because tcsh never creates sockets.
++            */
++           && fstat(f, &st) == 0 && !S_ISSOCK(st.st_mode)
++#endif
+ 	    )
+ 	  {
+ 	    xclose(f);