summaryrefslogtreecommitdiffstats
path: root/el7/environment-modules-3.2.10-ignore-nested-dirs.patch
blob: b53e71b6041f68aa524a1d3dc78729c97a706f08 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
diff -up modules-3.2.9/locate_module.c.SourceVers modules-3.2.9/locate_module.c
--- modules-3.2.9/locate_module.c.SourceVers	2013-06-30 17:23:01.451210176 +0200
+++ modules-3.2.9/locate_module.c	2013-06-30 17:24:16.963201645 +0200
@@ -1194,6 +1194,11 @@ int SourceVers( Tcl_Interp *interp, char
 		 **  The version has been specified in the
 		 **  '.version' file. Set up the result code
 		 **/
+		/* version can be only located in the current directory */
+		if (strrchr(version, '/')) {
+			ErrorLogger( ERR_BADMODNAM, LOC, version, NULL);
+			return( TCL_ERROR);
+		}
 		/* for deep modulefile dirs ... just use lowest part */
 		if (!(modname = (char*) strrchr( name, '/'))) {
 			modname = name;