Merge branch 'maint'

diff --git a/lib/commit.tcl b/lib/commit.tcl
index 7099f5c6f79a72e75b83cfdc7432249476c492cb..10b0430f54863111268a4b67364cbc678b0eb50d 100644 (file)
--- a/lib/commit.tcl
+++ b/lib/commit.tcl
@@ -253,7 +253,7 @@ proc commit_committree {fd_wt curHEAD msg} {
        global repo_config
 
        gets $fd_wt tree_id
-       if {$tree_id eq {} || [catch {close $fd_wt} err]} {
+       if {[catch {close $fd_wt} err]} {
                error_popup [strcat [mc "write-tree failed:"] "\n\n$err"]
                ui_status {Commit failed.}
                unlock_index