diff options
| -rw-r--r-- | lib/browser.tcl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/browser.tcl b/lib/browser.tcl index a8c6223511..0328338fda 100644 --- a/lib/browser.tcl +++ b/lib/browser.tcl @@ -26,8 +26,14 @@ constructor new {commit {path {}}} { wm withdraw $top wm title $top [append "[appname] ([reponame]): " [mc "File Browser"]] + if {$path ne {}} { + if {[string index $path end] ne {/}} { + append path / + } + } + set browser_commit $commit - set browser_path $browser_commit:$path + set browser_path "$browser_commit:[escape_path $path]" ${NS}::label $w.path \ -textvariable @browser_path \ |