Blame SOURCES/environment-modules-3.2.10-ignore-nested-dirs.patch

d93c5f
diff -up modules-3.2.9/locate_module.c.SourceVers modules-3.2.9/locate_module.c
d93c5f
--- modules-3.2.9/locate_module.c.SourceVers	2013-06-30 17:23:01.451210176 +0200
d93c5f
+++ modules-3.2.9/locate_module.c	2013-06-30 17:24:16.963201645 +0200
d93c5f
@@ -1194,6 +1194,11 @@ int SourceVers( Tcl_Interp *interp, char
d93c5f
 		 **  The version has been specified in the
d93c5f
 		 **  '.version' file. Set up the result code
d93c5f
 		 **/
d93c5f
+		/* version can be only located in the current directory */
d93c5f
+		if (strrchr(version, '/')) {
d93c5f
+			ErrorLogger( ERR_BADMODNAM, LOC, version, NULL);
d93c5f
+			return( TCL_ERROR);
d93c5f
+		}
d93c5f
 		/* for deep modulefile dirs ... just use lowest part */
d93c5f
 		if (!(modname = (char*) strrchr( name, '/'))) {
d93c5f
 			modname = name;