libmodules.tcl: remove trailing slash in overlay

2026-07-01 03:39:39 +02:00 · 2020-04-14 17:48:59 +02:00
parent 240dce31dd
commit 284e3c0c21
1 changed files with 4 additions and 0 deletions
@@ -274,6 +274,10 @@ proc ModulesHelp { } {
 proc _find_overlay { modulefile_components } {
        debug "_is_in_overlay"
        foreach overlay $::PmodulesOverlays  {
+                debug "$overlay"
+                if { [string range $overlay end end] == "/" } {
+                        set overlay [string range $overlay 0 end-1]
+                }
                set	overlay_components	[file split $overlay]
                set	overlay_num_components	[llength $overlay_components]
                set	modulefile_root	[file join \