From 4bd31f0da05570e94b4d17c4de8f5cfe75fa65ca Mon Sep 17 00:00:00 2001 From: Remi Collet Date: Thu, 17 Mar 2016 06:44:29 +0100 Subject: environment-modules: import from RHEL --- el7/environment-modules-3.2.10-ignore-nested-dirs.patch | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 el7/environment-modules-3.2.10-ignore-nested-dirs.patch (limited to 'el7/environment-modules-3.2.10-ignore-nested-dirs.patch') diff --git a/el7/environment-modules-3.2.10-ignore-nested-dirs.patch b/el7/environment-modules-3.2.10-ignore-nested-dirs.patch new file mode 100644 index 0000000..b53e71b --- /dev/null +++ b/el7/environment-modules-3.2.10-ignore-nested-dirs.patch @@ -0,0 +1,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; -- cgit