From 0623f2d0abb81a6e791c62f772d32f46c0ca8775 Mon Sep 17 00:00:00 2001
From: Achim Gsell <achim.gsell@psi.ch>
Date: Tue, 16 Oct 2018 14:37:27 +0200
Subject: [PATCH] Pmodules/libmodules.tcl - support for use-flags added

---
 Pmodules/libmodules.tcl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Pmodules/libmodules.tcl b/Pmodules/libmodules.tcl
index 97fef02..d929a7b 100644
--- a/Pmodules/libmodules.tcl
+++ b/Pmodules/libmodules.tcl
@@ -327,7 +327,8 @@ proc _pmodules_init_global_vars { } {
 	set	P		"${name}"
 	set	version		[lindex $modulefile end]
 	set 	V		"${version}"
-	lassign [split $V -] V_PKG V_RELEASE
+	lassign [split $V -]	V_PKG tmp
+	set	V_RELEASE	[lindex [split $tmp _] 0]
 	lassign [split $V_PKG .] V_MAJOR V_MINOR V_PATCHLVL
 	set	implementation	[lrange $rel_modulefile 2 end]
 	set	prefix		"$pmodules_root $group [lreverse_n $implementation 2]"